OFFSET
1,2
LINKS
Seiichi Manyama, Table of n, a(n) for n = 1..223
MATHEMATICA
DeleteDuplicates[Table[{2^n, Total[IntegerDigits[2^n]]}, {n, 0, 60}], GreaterEqual[ #1[[2]], #2[[2]]]&][[All, 1]] (* Harvey P. Dale, Aug 15 2022 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Amarnath Murthy, Apr 02 2002
EXTENSIONS
More terms from Larry Reeves (larryr(AT)acm.org), Jun 26 2002
STATUS
approved