OFFSET
1,2
LINKS
T. D. Noe, Table of n, a(n) for n = 1..10000
FORMULA
MATHEMATICA
Differences[NestList[#+FactorInteger[#][[-1, 1]]&, 1, 100]] (* Paolo Xausa, Dec 09 2023 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Oct 04 2002
STATUS
approved