A030105 Base 6 reversal of n (written in base 10).

0, 1, 2, 3, 4, 5, 1, 7, 13, 19, 25, 31, 2, 8, 14, 20, 26, 32, 3, 9, 15, 21, 27, 33, 4, 10, 16, 22, 28, 34, 5, 11, 17, 23, 29, 35, 1, 37, 73, 109, 145, 181, 7, 43, 79, 115, 151, 187, 13, 49, 85, 121, 157, 193, 19, 55, 91, 127, 163, 199, 25, 61, 97, 133, 169, 205, 31, 67, 103, 139, 175

Offset

0,3

Links

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

Mathematica

Table[FromDigits[Reverse[IntegerDigits[n, 6]], 6], {n, 0, 100}] (* Harvey P. Dale, Nov 18 2021 *)

Prog

(PARI) a(n, b=6)=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 - A030108, A004086, A055952, A319723.

Sequence in context: A244414 A214394 A255691 * A255591 A324395 A350112

Adjacent sequences: A030102 A030103 A030104 * A030106 A030107 A030108

Keyword

nonn,base,look

Author

David W. Wilson

Status

approved