OFFSET
0,26
LINKS
EXAMPLE
a(25) = 2 because we have [16, 9] and [9, 4, 4, 4, 4].
MATHEMATICA
Table[SeriesCoefficient[Product[1/(1 - Boole[Mod[n, k] > 0 && OddQ[DivisorSigma[0, k]]] x^k), {k, 1, n}], {x, 0, n}], {n, 0, 95}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Oct 26 2017
STATUS
approved