OFFSET
1,2
LINKS
Robert Israel, Table of n, a(n) for n = 1..2500
MAPLE
rev:= proc(n) local L, i; L:= convert(n, base, 10); add(L[-i]*10^(i-1), i=1..nops(L)) end proc:
sort(map(rev, [seq(8^i, i=0 .. floor(log[8](10^20)))])); # Robert Israel, Mar 05 2025
MATHEMATICA
IntegerReverse[8^Range[0, 20]]//Sort (* Harvey P. Dale, Jul 19 2024 *)
CROSSREFS
KEYWORD
base,easy,nonn,changed
AUTHOR
Jonathan Vos Post, Oct 08 2007
STATUS
approved