A039079 Numbers whose base-9 representation has the same number of 0's and 3's.

1, 2, 4, 5, 6, 7, 8, 10, 11, 13, 14, 15, 16, 17, 19, 20, 22, 23, 24, 25, 26, 27, 37, 38, 40, 41, 42, 43, 44, 46, 47, 49, 50, 51, 52, 53, 55, 56, 58, 59, 60, 61, 62, 64, 65, 67, 68, 69, 70, 71, 73, 74, 76, 77, 78, 79, 80, 84, 91, 92, 94, 95, 96, 97, 98, 100, 101, 103, 104

Offset

1,2

Links

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

Mathematica

Select[Range[200], DigitCount[#, 9, 0]==DigitCount[#, 9, 3]&] (* Harvey P. Dale, Sep 18 2016 *)

Prog

(MATLAB)
a = NaN(10000, 1); k = 0; j = 1;
while any(isnan(a))
    d = dec2base(k, 9)-'0';
    if sum(d==0)==sum(d==3)
        a(j) = k; j = j+1;
    end
    k = k+1;
end
disp(regexprep(num2str(a'), ' +', ', ')) % Chris R. Rehmann, Mar 01 2026

Crossrefs

Cf. A007095, A039359.

Cf. A039077, A039078, A039080, A039081, A039082, A039083, A031492.

Cf. A039085, A039091.

Sequence in context: A385479 A086743 A285432 * A260375 A361144 A188160

Adjacent sequences: A039076 A039077 A039078 * A039080 A039081 A039082

Keyword

nonn,base,easy

Author

Olivier Gérard

Status

approved