OFFSET
0,7
LINKS
Amiram Eldar, Table of n, a(n) for n = 0..7000
Eric Weisstein's World of Mathematics, Distinct Prime Factors
FORMULA
G.f.: 1/(1 - Sum_{k>=1} x^A030231(k)).
EXAMPLE
a(8) = 4 because we have [6, 1, 1], [1, 6, 1], [1, 1, 6] and [1, 1, 1, 1, 1, 1, 1, 1].
MATHEMATICA
nmax = 53; CoefficientList[Series[1/(1 - Sum[Boole[EvenQ[PrimeNu[k]]] x^k, {k, 1, nmax}]), {x, 0, nmax}], x]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, May 04 2017
STATUS
approved