|
|
A030108
|
|
Base 9 reversal of n (written in base 10).
|
|
22
|
|
|
0, 1, 2, 3, 4, 5, 6, 7, 8, 1, 10, 19, 28, 37, 46, 55, 64, 73, 2, 11, 20, 29, 38, 47, 56, 65, 74, 3, 12, 21, 30, 39, 48, 57, 66, 75, 4, 13, 22, 31, 40, 49, 58, 67, 76, 5, 14, 23, 32, 41, 50, 59, 68, 77, 6, 15, 24, 33, 42, 51, 60, 69, 78, 7, 16, 25, 34, 43, 52, 61, 70, 79, 8, 17, 26, 35, 44
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
Table of n, a(n) for n=0..76.
|
|
MATHEMATICA
|
Table[FromDigits[Reverse[IntegerDigits[n, 9]], 9], {n, 0, 80}] (* Harvey P. Dale, Jun 01 2017 *)
|
|
PROG
|
(PARI) a(n, b=9)=subst(Polrev(base(n, b)), x, b) /* where */
base(n, b)={my(a=[n%b]); while(0<n\=b, a=concat(n%b, a)); a} \\ M. F. Hasler, Nov 04 2011
|
|
CROSSREFS
|
Cf. A030101 - A030107, A004086.
Sequence in context: A023125 A319657 A255594 * A307651 A297330 A037904
Adjacent sequences: A030105 A030106 A030107 * A030109 A030110 A030111
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
David W. Wilson
|
|
STATUS
|
approved
|
|
|
|