OFFSET
0,5
COMMENTS
a(n) = A078635(n) for n < 32 = 2^5.
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..1000
FORMULA
G.f.: Product_{k>=1} (1 - x^(k^6)) / ((1 - x^(k^2)) * (1 - x^(k^3))). - Vaclav Kotesovec, Jan 12 2017
EXAMPLE
a(10) = #{9+1, 8+1+1, 4+4+1+1, 4+1+1+1+1+1+1, 1+1+1+1+1+1+1+1+1+1} = 5.
MATHEMATICA
nmax = 65; c2max = nmax^(1/2); c3max = nmax^(1/3);
s = Flatten[{Table[n^2, {n, 1, c2max}]}~Join~{Table[n^3, {n, 1, c3max}]}];
Table[Count[IntegerPartitions@n, x_ /; SubsetQ[s, x]], {n, 0, nmax}] (* Robert Price, Jul 31 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Jul 16 2007
EXTENSIONS
a(0)=1 prepended by Ilya Gutkovskiy, Jan 11 2017
STATUS
approved