Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A094428
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A094428 Expansion of infinite product (q^12,q^12,q^6;q^5,q^7;q^12)_infty. +0
1
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; listen)
OFFSET

0,36

COMMENT

|a(n)|<3 if n<1299, a(1299)=3.

FORMULA

G.f.: Product_{k>0} (1-x^(12k))^2(1-x^(12k-6))/((1-x^(12k-5))(1-x^(12k-7))).

PROGRAM

(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: A010105 A083916 A083893 this_sequence A082786 A101638 A070141

Adjacent sequences: A094425 A094426 A094427 this_sequence A094429 A094430 A094431

KEYWORD

sign

AUTHOR

Michael Somos, May 10 2004

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified November 25 20:09 EST 2009. Contains 167514 sequences.


AT&T Labs Research