login
This site is supported by donations to The OEIS Foundation.
Logo

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A122129 Expansion of 1 + Sum_{k>0} x^k^2/((1-x)(1-x^2)...(1-x^(2k))). 1
1, 1, 1, 2, 3, 4, 5, 7, 9, 12, 15, 19, 24, 30, 37, 46, 57, 69, 84, 102, 123, 148, 177, 211, 252, 299, 353, 417, 491, 576, 675, 789, 920, 1071, 1244, 1442, 1670, 1929, 2224, 2562, 2946, 3381, 3876, 4437, 5072, 5791, 6602, 7517, 8551, 9714, 11021, 12493 (list; graph; refs; listen; history; internal format)
OFFSET

0,4

COMMENTS

Generating function arises naturally in Rodney Baxter's solution of the Hard Hexagon Model according to George Andrews.

REFERENCES

G. E. Andrews, R. Askey and R. Roy, Special Functions, Cambridge University Press, 1999; Exercise 6(a), p. 591.

G. E. Andrews, q-series, CBMS Regional Conference Series in Mathematics, 66, Amer. Math. Soc. 1986, see p. 8, Eq. (1.7). MR0858826 (88b:11063)

FORMULA

Euler transform of period 20 sequence [ 1, 0, 1, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 1, 1, 0, 1, 0, ...].

Expansion of f(-q^2)f(-q^20)/(f(-q)f(-q^4,-q^16)) in powers of q where f(-q)=f(-q,-q^2) and f(a,b) is Ramanujan's two variable theta function.

G.f.: 1 +Sum_{k>0} x^k^2/((1-x)(1-x^2)...(1-x^(2k))).

G.f. 1/(Product_{k>0} (1-x^(2k-1))(1-x^(20k-4))(1-x^(20k-16))).

PROG

(PARI) {a(n)=if(n<1, n==0, polcoeff( sum(k=1, sqrtint(n), x^k^2/prod(i=1, 2*k, 1-x^i, 1+x*O(x^(n-k^2)))), n))}

CROSSREFS

Sequence in context: A190269 A039853 A062188 * A003413 A100853 A174065

Adjacent sequences:  A122126 A122127 A122128 * A122130 A122131 A122132

KEYWORD

nonn

AUTHOR

Michael Somos, Aug 21 2006

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .

Last modified February 16 11:51 EST 2012. Contains 205908 sequences.