M. Michael Somos, <a href="/A010815/a010815.txt">Introduction to Ramanujan theta functions</a>

M. Somos, <a href="http://somos.crg4.comA010815/multiqa010815.htmltxt">Introduction to Ramanujan theta functions</a>

reviewed

approved

proposed

reviewed

editing

proposed

G. C. Greubel, <a href="/A255319/b255319.txt">Table of n, a(n) for n = 0..1000</a>

approved

editing

editing

approved

allocated for Michael SomosExpansion of psi(x^3) * f(x, x^5) in powers of x where psi(), f() are Ramanujan theta functions.

1, 1, 0, 1, 1, 1, 0, 0, 2, 1, 1, 1, 0, 0, 1, 0, 1, 1, 1, 2, 0, 1, 0, 1, 1, 1, 1, 0, 0, 0, 2, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 2, 0, 0, 1, 1, 2, 0, 1, 0, 0, 1, 0, 1, 1, 0, 1, 0, 2, 1, 2, 1, 0, 2, 0, 1, 1, 0, 0, 2, 0, 0, 0, 1, 1, 0, 0, 0, 1, 2, 3, 1

0,9

Ramanujan theta functions: f(q) (see A121373), phi(q) (A000122), psi(q) (A010054), chi(q) (A000700).

M. Somos, <a href="http://somos.crg4.com/multiq.html">Introduction to Ramanujan theta functions</a>

Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/RamanujanThetaFunctions.html">Ramanujan Theta Functions</a>

Expansion of chi(x) * f(-x^6) * f(-x^12) in powers of x where chi(), f() are Ramanujan theta functions.

Expansion of q^(-17/24) * eta(q^2)^2 * eta(q^6) * eta(q^12) / (eta(q) * eta(q^4)) in powers of q.

Euler transform of period 12 sequence [ 1, -1, 1, 0, 1, -2, 1, 0, 1, -1, 1, -2, ...].

G.f. = 1 + x + x^3 + x^4 + x^5 + 2*x^8 + x^9 + x^10 + x^11 + x^14 + x^16 + ...

G.f. = q^17 + q^41 + q^89 + q^113 + q^137 + 2*q^209 + q^233 + q^257 + q^281 + ...

a[ n_] := SeriesCoefficient[ QPochhammer[ x^6] QPochhammer[ x^12] QPochhammer[ -x, x^2], {x, 0, n}];

(PARI) {a(n) = my(A); if( n<0, 0, A = x * O(x^n); polcoeff( eta(x^2 + A)^2 * eta(x^6 + A) * eta(x^12 + A) / (eta(x + A) * eta(x^4 + A)), n))};

allocated

nonn

Michael Somos, Feb 21 2015

approved

editing

allocated for Michael Somos

allocated

approved