A024634 n written in fractional base 5/4.

0, 1, 2, 3, 4, 40, 41, 42, 43, 44, 430, 431, 432, 433, 434, 4320, 4321, 4322, 4323, 4324, 43210, 43211, 43212, 43213, 43214, 432100, 432101, 432102, 432103, 432104, 432140, 432141, 432142, 432143, 432144, 4321030, 4321031, 4321032, 4321033, 4321034

Offset: 0

Author

David W. Wilson

Keywords

• nonn
• base
• easy

Comments

To represent a number in base b, if a digit exceeds b-1, subtract b and carry 1. In fractional base a/b, subtract a and carry b.

Links

• Amiram Eldar, Table of n, a(n) for n = 0..10000
• Index entries for sequences related to fractional bases.

Crossrefs

Cf. A245335, A245357.

Programs

Mathematica

a[n_] := a[n] = If[n == 0, 0, 10 * a[4 * Floor[n/5]] + Mod[n, 5]]; Array[a, 50, 0] (* Amiram Eldar, Jul 31 2025 *)

PARI

a(n) = if(n == 0, 0, 10 * a(n\5 * 4) + n % 5); \\ Amiram Eldar, Jul 31 2025