OFFSET
0,4
COMMENTS
Sequence is monotonic because A011371 is.
LINKS
MATHEMATICA
Nest[Append[#1, #2 #1[[-#2]] ] & @@ {#, Total@ IntegerDigits[Length@ #, 2]} &, {1}, 55] (* Michael De Vlieger, Nov 25 2018 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Nov 24 2018
STATUS
approved