A279948 Expansion of (Sum_{k>=1} x^(prime(k)^2))^3.
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 3, 0, 0, 0, 0, 3, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 6, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 0, 0, 3, 0, 3, 0, 0, 6, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 6, 0, 0, 0, 0, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3
Offset: 0
Keywords
Examples
a(22) = 3 because we have [4, 9, 9], [9, 4, 9] and [9, 9, 4].
Programs
-
Mathematica
nmax = 125; CoefficientList[Series[(Sum[x^Prime[k]^2, {k, 1, nmax}])^3, {x, 0, nmax}], x]
Formula
G.f.: (Sum_{k>=1} x^(prime(k)^2))^3.
Comments