|
Search: id:A095846
|
|
|
| A095846 |
|
Expansion of eta(q^2)eta(q^10)^3/(eta(q^5)eta(q)^3) in powers of q. |
|
+0
3
|
|
| 1, 3, 8, 19, 41, 84, 164, 307, 557, 983, 1692, 2852, 4718, 7672, 12288, 19411, 30274, 46671, 71180, 107479, 160792, 238476, 350828, 512196, 742441, 1068914, 1529120, 2174216, 3073670, 4321444, 6044072, 8411283, 11649936, 16062102, 22048604
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
G.f. A(x) satisfies 0=f(A(x),A(x^2)) where f(u,v)=-u^2+v+6uv+4v^2+20uv^2.
Euler transform of period 10 sequence [3,2,3,2,4,2,3,2,3,0,...].
|
|
FORMULA
|
G.f. x(Prod_{k>0} (1-x^(2k))(1-x^(10k))^3/((1-x^k)^3(1-x^(5k)))).
|
|
PROGRAM
|
(PARI) a(n)=local(A); if(n<1, 0, n--; A=x*O(x^n); polcoeff(eta(x^2+A)*eta(x^10+A)^3/(eta(x+A)^3*eta(x^5+A)), n))
|
|
CROSSREFS
|
Adjacent sequences: A095843 A095844 A095845 this_sequence A095847 A095848 A095849
Sequence in context: A082535 A136396 A006380 this_sequence A089924 A072916 A074839
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Michael Somos, Jun 08 2004
|
|
|
Search completed in 0.002 seconds
|
