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!)
A094428 Expansion of infinite product (q^12, q^12, q^6; q^5, q^7; q^12)_oo. 0
1, 0, 0, 0, 0, 1, -1, 1, 0, 0, 1, -1, -1, -1, 1, 1, -1, 0, 0, 0, 0, 0, 0, -1, 1, 0, -1, -1, 0, 0, 1, -1, -1, -1, 0, 2, 0, 0, 0, 0, 0, -1, 0, 0, 0, 1, -2, 0, -1, 2, 0, -1, 1, -1, -1, 0, 1, 0, 0, 1, 0, -1, 0, 0, 1, 1, 0, 0, 0, 0, 1, -1, -1, 0, -1, 1, 0, 0, 1, -1, 1, 0, -1, 0, 1, 1, 0, 1, -1, -1, 1, 0, 1, 0, 1, 0, -1, -1, 1, 0, 1, 0, 1, 0, -1 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,36
COMMENTS
|a(n)| < 3 if n < 1299, a(1299) = 3.
LINKS
FORMULA
G.f.: Product_{k>0} (1-x^(12k))^2 * (1-x^(12k-6)) / ((1-x^(12k-5))*(1-x^(12k-7))).
PROG
(PARI) a(n)=local(A); if(n<0, 0, A=1+x*O(x^n); polcoeff(prod(n=1, n\12+1, if(m=12*n, (A-x^m)^2*(A-x^(m-6))/(A-x^(m-5))/(A-x^(m-7)))), n))
CROSSREFS
Sequence in context: A083916 A083893 A187097 * A277148 A194024 A082786
KEYWORD
sign
AUTHOR
Michael Somos, May 10 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 March 28 13:25 EDT 2024. Contains 371254 sequences. (Running on oeis4.)