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!)
A095123 Expansion of ((eta(q)eta(q^15))/(eta(q^3)eta(q^5)))^3 in powers of q. 1
1, -3, 0, 8, -9, 3, 8, -27, 24, 19, -48, 24, 17, -54, 57, 46, -147, 51, 145, -222, 123, 160, -459, 315, 306, -678, 360, 326, -870, 633, 612, -1581, 723, 1286, -2301, 1242, 1522, -3864, 2451, 2455, -5478, 2934, 2924, -7044, 4599, 4622, -11271, 5514, 8133, -15591, 8508 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
COMMENTS
G.f. A(x) satisfies 0=f(A(x),A(x^2)) where f(u,v)=u^3+v^3+uv(-1+6(u+v)-uv).
Euler transform of period 15 sequence [ -3,-3,0,-3,0,0,-3,-3,0,0,-3,0,-3,-3,0,...].
REFERENCES
B. C. Berndt, H. H. Chan, S.-S. Huang, Incomplete Elliptic Integrals in Ramanujan's Lost Notebook, in q-series from a Contemporary Perspective, M. E. H. Ismail and D. Stanton, eds., Amer. Math. Soc., 2000, pp. 79-126.
LINKS
B. C. Berndt, H. H. Chan, S.-S. Huang, Incomplete Elliptic Integrals in Ramanujan's Lost Notebook.
FORMULA
G.f. x(Prod_{k>0} ((1-x^k)(1-x^(15k)))/(1-x^(3k))(1-x^(5k)))^3.
PROG
(PARI) a(n)=local(A); if(n<1, 0, n--; A=x*O(x^n); polcoeff((eta(x+A)*eta(x^15+A)/eta(x^3+A)/eta(x^5+A))^3, n))
CROSSREFS
Sequence in context: A199659 A201584 A281298 * A019691 A192919 A068607
KEYWORD
sign
AUTHOR
Michael Somos, May 28 2004
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 April 19 18:05 EDT 2024. Contains 371798 sequences. (Running on oeis4.)