OFFSET
0,13
FORMULA
a(n) = [x^n y^3] Product_{k>=1} (1 + y*x^A246655(k)).
EXAMPLE
a(15) = 4 because we have [9, 4, 2], [8, 5, 2], [8, 4, 3] and [7, 5, 3].
MATHEMATICA
Table[Count[IntegerPartitions[n, {3}], _?(And[UnsameQ @@ #, AllTrue[#, PrimePowerQ[#] &]] &)], {n, 0, 78}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Apr 30 2019
STATUS
approved