A030108 Base 9 reversal of n (written in base 10).

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

Offset

0,3

Links

Seiichi Manyama, Table of n, a(n) for n = 0..6560

Mathematica

Table[FromDigits[Reverse[IntegerDigits[n, 9]], 9], {n, 0, 80}] (* Harvey P. Dale, Jun 01 2017 *)

Prog

(PARI) apply( {A030108(n, b=9)=fromdigits(Vecrev(digits(n, b)), b)}, [0..99])  \\ M. F. Hasler, May 21 2021, replacing earlier code from M. F. Hasler, Nov 04 2011

Crossrefs

Cf. A030101 - A030107, A004086, A055958, A319726.

Sequence in context: A023125 A319657 A255594 * A307651 A297330 A037904

Adjacent sequences: A030105 A030106 A030107 * A030109 A030110 A030111

Keyword

nonn,base,look

Author

David W. Wilson

Status

approved