OFFSET
1,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..10000
MATHEMATICA
NestList[# + PrimeOmega[#] &, 2, 100] (* Zak Seidov, Feb 15 2015 *)
PROG
(PARI) lista(nn) = {print1(a=2, ", "); for (n=2, nn, a += bigomega(a); print1(a, ", "); ); } \\ Michel Marcus, May 04 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, May 21 2009
EXTENSIONS
Extended by Ray Chandler, Jun 16 2009
STATUS
approved