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

0, 1, 2, 3, 5, 7, 8, 9, 10, 11, 12, 14, 16, 17, 18, 19, 20, 21, 23, 25, 26, 27, 28, 29, 30, 32, 34, 35, 42, 45, 46, 47, 48, 50, 52, 53, 58, 63, 64, 65, 66, 68, 70, 71, 72, 73, 74, 75, 77, 79, 80, 81, 82, 83, 84, 86, 88, 89, 90, 91, 92, 93, 95, 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, 6]&] (* Harvey P. Dale, Apr 27 2018 *)

Prog

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

Crossrefs

Cf. A007095, A039384.

Cf. A039102, A039104, A039105.

Cf. A039082, A039088, A039094, A039099, A039106.

Sequence in context: A039190 A039142 A346127 * A228082 A391862 A153088

Adjacent sequences: A039100 A039101 A039102 * A039104 A039105 A039106

Keyword

nonn,base,easy

Author

Olivier Gérard

Status

approved