M. Michael Somos, <a href="/A010815/a010815.txt">Introduction to Ramanujan theta functions</a>
M. Michael Somos, <a href="/A010815/a010815.txt">Introduction to Ramanujan theta functions</a>
M. Somos, <a href="http://cis.csuohio.edu/~somosA010815/multiqa010815pdftxt">Introduction to Ramanujan theta functions</a>
proposed
approved
editing
proposed
eta[q_]:=q^(1/24)*QPochhammer[q]; a[n_]:= SeriesCoefficient[q^(1/2)*(eta[q]/eta[q^2])^12, {q, 0, n}]; Table[a[n], {n, 0, 50}] (* _G. C. Greubel_, Feb 13 2018 *)
proposed
editing
editing
proposed
Expansion of q^(1/2)*(eta(q)/eta(q^2))^12 in powers of q. - G. C. Greubel, Feb 13 2018
eta[q_]:=q^(1/24)*QPochhammer[q]; a[n_]:= SeriesCoefficient[q^(1/2)*(eta[q]/eta[q^2])^12, {q, 0, n}]; Table[a[n], {n, 0, 50}] (* _G. C.Greubel_, Feb 13 2018 *)
approved
editing
proposed
approved
editing
proposed
G.f.: prod(Product_{m>=1, } (1 + x^m )^(-12).
G.f.: exp(-12*Sum_{k>=1} (-1)^(k+1)*x^k/(k*(1 - x^k))). - Ilya Gutkovskiy, Feb 06 2018
Column k=12 of A286352.
approved
editing