A030104 Base 5 reversal of n (written in base 10).

0, 1, 2, 3, 4, 1, 6, 11, 16, 21, 2, 7, 12, 17, 22, 3, 8, 13, 18, 23, 4, 9, 14, 19, 24, 1, 26, 51, 76, 101, 6, 31, 56, 81, 106, 11, 36, 61, 86, 111, 16, 41, 66, 91, 116, 21, 46, 71, 96, 121, 2, 27, 52, 77, 102, 7, 32, 57, 82, 107, 12, 37, 62, 87, 112, 17, 42, 67, 92, 117, 22, 47, 72, 97

Offset: 0

Author

David W. Wilson

Keywords

• nonn
• base
• look
• easy

Links

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

Crossrefs

Cf. A134028, A030101 - A030108, A004086, A055950, A319722.

Programs

Mathematica

IntegerReverse[Range[0, 100], 5] (* Paolo Xausa, Aug 07 2024 *)

PARI

a(n,b=5)=subst(Polrev(base(n,b)),x,b) /* where */
base(n,b)={my(a=[n%b]);while(n\=b,a=concat(n%b,a));a}  \\ M. F. Hasler, Nov 04 2011