|
|
A071587
|
|
Powers of 9 written backwards.
|
|
4
|
|
|
1, 9, 18, 927, 1656, 94095, 144135, 9692874, 12764034, 984024783, 1044876843, 90695018313, 184635924282, 9238285681452, 16945429767822, 946490231198502, 1481588810203581, 96566699618177661, 121999692536490051, 9802992767171580531, 10882965095456675121
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
MAPLE
|
revdigs:= proc(n) local L;
L:= convert(n, base, 10);
add(L[-i]*10^(i-1), i=1..nops(L))
end proc:
|
|
MATHEMATICA
|
IntegerReverse[9^Range[0, 20]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, May 26 2018 *)
|
|
PROG
|
(PARI) for(i=1, 50, n=9^i; s=ceil(log(n)/log(10)); print1(sum(i=0, s, 10^(s-i-1)*(floor(n/10^i)-10*floor(n/10^(i+1)))), ", "))
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|