OFFSET
0,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..954
MAPLE
b:= proc(n) local m; m:= n; "";
while m>0 do irem(m, 9, 'm'), % od;
parse(cat(%))
end:
a:= n-> b(10^n):
seq(a(n), n=0..23); # Alois P. Heinz, Aug 23 2019
MATHEMATICA
a[n_]:=FromDigits[IntegerDigits[10^n, 9]]; Array[a, 20, 0] (* Stefano Spezia, Jun 01 2025 *)
CROSSREFS
KEYWORD
easy,nonn,base
AUTHOR
Henry Bottomley, Jun 27 2000
EXTENSIONS
More terms from James Sellers, Jul 04 2000
STATUS
approved
