OFFSET
0,3
LINKS
Antti Karttunen, Table of n, a(n) for n = 0..150
MATHEMATICA
Nest[Append[#1, #2 #1[[-#2]] ] & @@ {#, DivisorSigma[0, Length@ #]} &, {1}, 53] (* Michael De Vlieger, Nov 25 2018 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Nov 24 2018
STATUS
approved