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