A024664 n written in fractional base 10/9.

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 980, 981, 982, 983, 984, 985, 986, 987, 988, 989, 9870, 9871, 9872, 9873, 9874, 9875, 9876, 9877, 9878, 9879, 98760, 98761, 98762, 98763, 98764, 98765, 98766, 98767, 98768, 98769, 987650

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. A245339.

Programs

Mathematica

a[n_] := a[n] =  If[n == 0, 0, 10 * a[9 * Floor[n/10]] + Mod[n, 10]]; Array[a, 50, 0] (* Amiram Eldar, Aug 04 2025 *)

PARI

a(n) = if(n == 0, 0, 10 * a(n\10 * 9) + n % 10); \\ Amiram Eldar, Aug 04 2025