Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A028613
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A028613 Expansion of (theta_3(z)*theta_3(12z)+theta_2(z)*theta_2(12z)). +0
1
1, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 2, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0 (list; graph; listen)
OFFSET

0,5

COMMENT

Expansion of theta_3(q)theta_3(q^12)+theta_2(q)*theta_2(q^12) in powers of q^(1/4).

FORMULA

a(8n+7)=a(8n+6)=a(8n+3)=a(8n+2)=a(8n+1)=a(16n+8)=a(16n+12)=0.

PROGRAM

(PARI) a(n)=local(X); if(n<0, 0, X=x+x*O(x^n); polcoeff((eta(X^8)*eta(X^96))^5/(eta(X^4)*eta(X^16)*eta(X^48)*eta(X^192))^2+4*x^\ 13*(eta(X^16)*eta(X^192))^2/(eta(X^8)*eta(X^96)), n))

CROSSREFS

Sequence in context: A084863 A073346 A114099 this_sequence A024362 A104488 A010103

Adjacent sequences: A028610 A028611 A028612 this_sequence A028614 A028615 A028616

KEYWORD

nonn

AUTHOR

N. J. A. Sloane (njas(AT)research.att.com).

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 December 6 22:55 EST 2009. Contains 170429 sequences.


AT&T Labs Research