login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A053273 Coefficients of the '6th-order' mock theta function 2 mu(q). 9
1, 2, -3, 4, -4, 6, -11, 14, -15, 22, -31, 34, -41, 56, -69, 82, -98, 120, -152, 178, -204, 254, -308, 354, -415, 496, -587, 680, -785, 922, -1084, 1248, -1427, 1664, -1935, 2202, -2517, 2906, -3336, 3798, -4315, 4930, -5636, 6380, -7202, 8194, -9305, 10474, -11801, 13342, -15050 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,2
REFERENCES
Srinivasa Ramanujan, The Lost Notebook and Other Unpublished Papers, Narosa Publishing House, New Delhi, 1988, p. 13
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..1000 (corrected previous b-file from G. C. Greubel)
George E. Andrews and Dean Hickerson, Ramanujan's "lost" notebook VII: The sixth order mock theta functions, Advances in Mathematics, 89 (1991) 60-105.
FORMULA
G.f.: 2 mu(q) = 1 + Sum_{n >= 0} (-1)^n q^(n+1) (1+q^n) (1-q)(1-q^3)...(1-q^(2n-1))/((1+q)(1+q^2)...(1+q^(n+1))).
a(n) ~ -(-1)^n * exp(Pi*sqrt(n/3)) / (2*sqrt(3*n)). - Vaclav Kotesovec, Jun 15 2019
MATHEMATICA
Series[1+Sum[(-1)^n q^(n+1) (1+q^n) Product[1-q^k, {k, 1, 2n-1, 2}]/Product[1+q^k, {k, 1, n+1}], {n, 0, 99}], {q, 0, 100}]
nmax = 100; CoefficientList[Series[1 + Sum[(-1)^k * x^(k+1) * (1+x^k) * Product[1-x^j, {j, 1, 2*k-1, 2}] / Product[1+x^j, {j, 1, k+1}], {k, 0, nmax}], {x, 0, nmax}], x] (* Vaclav Kotesovec, Jun 15 2019 *)
CROSSREFS
Other '6th-order' mock theta functions are at A053268, A053269, A053270, A053271, A053272, A053274.
Sequence in context: A017832 A347713 A056880 * A347700 A049988 A079247
KEYWORD
sign,easy
AUTHOR
Dean Hickerson, Dec 19 1999
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 18:04 EDT 2024. Contains 371254 sequences. (Running on oeis4.)