login
This site is supported by donations to The OEIS Foundation.

 

Logo

Invitation: celebrating 50 years of OEIS, 250000 sequences, and Sloane's 75th, there will be a conference at DIMACS, Rutgers, Oct 9-10 2014.

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A153174 Coefficients of the eighth order mock theta function U_1(q). 7
0, 1, 0, -1, 1, 2, -1, -2, 1, 3, -1, -4, 2, 5, -2, -6, 3, 8, -4, -9, 4, 11, -5, -14, 7, 17, -7, -20, 9, 24, -11, -28, 12, 33, -15, -39, 18, 46, -20, -53, 24, 62, -28, -72, 32, 83, -37, -96, 43, 110, -48 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,6

REFERENCES

B. Gordon and R. J. McIntosh, Some eighth order mock theta functions, J. London Math. Soc. 62 (2000), 321-335.

LINKS

Table of n, a(n) for n=0..50.

FORMULA

G.f: Sum_{n >= 0} q^((n+1)^2)(1+q)(1+q^3)...(1+q^(2n-1))/((1+q^2)(1+q^6)...(1+q^(4n+2))).

PROG

(PARI) lista(nn) = {my(q = qq + O(qq^nn)); gf = sum(n = 0, nn, q^((n+1)^2) * prod(k = 1, n, 1 + q^(2*k-1)) / prod(k = 0, n, 1 + q^(4*k+2))); for (i=0, nn-1, print1(polcoeff(gf, i), ", "); ); } \\ Michel Marcus, Jun 18 2013

CROSSREFS

Other '8th order' mock theta functions are at A153148, A153149, A153155, A153156, A153172, A153176, A153178.

Sequence in context: A224708 A029229 A029216 * A138222 A138224 A181472

Adjacent sequences:  A153171 A153172 A153173 * A153175 A153176 A153177

KEYWORD

sign

AUTHOR

Jeremy Lovejoy, Dec 20 2008

STATUS

approved

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

Content is available under The OEIS End-User License Agreement .

Last modified September 30 09:24 EDT 2014. Contains 247419 sequences.