A039360 Numbers whose base-9 representation has the same nonzero number of 0's and 4's.

36, 85, 117, 166, 198, 247, 279, 325, 326, 327, 329, 330, 331, 332, 333, 342, 351, 369, 378, 387, 396, 409, 441, 490, 522, 571, 603, 652, 684, 742, 751, 760, 766, 767, 768, 770, 771, 772, 773, 778, 787, 796, 805, 814, 846, 895, 927, 976, 1008, 1054, 1055, 1056

Offset

1,1

Links

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

Mathematica

Select[Range[1100], DigitCount[#, 9, 0]==DigitCount[#, 9, 4]>0&] (* Harvey P. Dale, May 22 2018 *)

Prog

(MATLAB)
a = NaN(52, 1); k = 0; j = 1;
while any(isnan(a))
    d = dec2base(k, 9)-'0';
    n1 = sum(d==0); n2 = sum(d==4);
    if n1==n2 && n1 > 0
        a(j) = k; j = j+1;
    end
    k = k+1;
end
disp(regexprep(num2str(a'), ' +', ', ')) % Chris R. Rehmann, Apr 03 2026

Crossrefs

Cf. A007095, A039080.

Cf. A039357, A039358, A039359, A039361, A039362, A039363, A039364.

Cf. A039367, A039373, A039378.

Sequence in context: A226264 A243804 A043183 * A043963 A044174 A044555

Adjacent sequences: A039357 A039358 A039359 * A039361 A039362 A039363

Keyword

nonn,base,easy

Author

Olivier Gérard

Status

approved