A039102 Numbers whose base-9 representation has the same number of 4's and 5's.

0, 1, 2, 3, 6, 7, 8, 9, 10, 11, 12, 15, 16, 17, 18, 19, 20, 21, 24, 25, 26, 27, 28, 29, 30, 33, 34, 35, 41, 49, 54, 55, 56, 57, 60, 61, 62, 63, 64, 65, 66, 69, 70, 71, 72, 73, 74, 75, 78, 79, 80, 81, 82, 83, 84, 87, 88, 89, 90, 91, 92, 93, 96, 97, 98, 99, 100, 101, 102

Offset

1,3

Links

Chris R. Rehmann, Table of n, a(n) for n = 1..10000

Mathematica

Select[Range[0, 110], DigitCount[#, 9, 4]==DigitCount[#, 9, 5]&] (* Harvey P. Dale, Jul 21 2013 *)

Prog

(MATLAB) x = 0:21643; d = dec2base(x, 9)-'0'; a = x(sum(d==4, 2)==sum(d==5, 2)); disp(regexprep(num2str(a), ' +', ', ')) % Chris R. Rehmann, Mar 19 2026

Crossrefs

Cf. A007095, A039383.

Cf. A039103, A039104, A039105.

Cf. A039081, A039087, A039093, A039098.

Sequence in context: A039141 A008541 A060464 * A287103 A050023 A047505

Adjacent sequences: A039099 A039100 A039101 * A039103 A039104 A039105

Keyword

nonn,base,easy

Author

Olivier Gérard

Status

approved