OFFSET
1,2
COMMENTS
An infinite subsequence of A010061.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1001
D. W. Bange, Solution to Problem E 2408, Amer. Math. Monthly, 81 (1974), 407.
MAPLE
f:=proc(n) option remember; if n=1 then 1 else 2^(nops(convert(f(n-1), base, 2)))+1+f(n-1); fi; end;
[seq(f(n), n=1..40)];
MATHEMATICA
NestList[2^IntegerLength[#, 2]+1+#&, 1, 40] (* Harvey P. Dale, May 05 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Nov 22 2013
STATUS
approved