%I #13 Jan 31 2021 20:39:52
%S 1,1,1,0,1,0,-1,1,0,1,2,-1,0,-1,-1,1,0,2,1,0,1,-2,-2,1,0,2,3,-2,0,-2,
%T -2,2,-1,3,3,-1,1,-2,-4,2,0,2,4,-3,1,-4,-4,3,-1,5,5,-2,2,-4,-6,3,-2,5,
%U 7,-4,0,-6,-6,4,-1,7,7,-4,3,-7,-9,5,-1,7,10,-6,1
%N Coefficients of the eighth-order mock theta function U_0(q).
%H B. Gordon and R. J. McIntosh, <a href="http://dx.doi.org/10.1112/S0024610700008735">Some eighth order mock theta functions</a>, J. London Math. Soc. 62 (2000), 321-335.
%F U_0(q) = Sum_{n >= 0} q^(n^2) (1+q)(1+q^3)...(1+q^(2n-1))/((1+q^4)(1+q^8)...(1+q^(4n))).
%o (PARI) lista(nn) = my(q = qq + O(qq^nn)); gf = sum(n = 0, nn, q^(n^2) * prod(k = 1, n, 1 + q^(2*k-1)) / prod(k = 1, n, 1 + q^(4*k))); Vec(gf) \\ _Michel Marcus_, Jun 18 2013
%Y Other '8th-order' mock theta functions are at A153148, A153149, A153155, A153156, A153174, A153176, A153178.
%K sign
%O 0,11
%A _Jeremy Lovejoy_, Dec 20 2008
%E More terms from _Michel Marcus_, Feb 23 2015