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

Author

David W. Wilson

Keywords

• nonn
• base
• look

Links

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

Crossrefs

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

Programs

Mathematica

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

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