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

1, 2, 3, 5, 6, 7, 8, 10, 11, 12, 14, 15, 16, 17, 19, 20, 21, 23, 24, 25, 26, 28, 29, 30, 32, 33, 34, 35, 36, 46, 47, 48, 50, 51, 52, 53, 55, 56, 57, 59, 60, 61, 62, 64, 65, 66, 68, 69, 70, 71, 73, 74, 75, 77, 78, 79, 80, 85, 91, 92, 93, 95, 96, 97, 98, 100, 101, 102, 104

Offset

1,2

Links

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

Mathematica

Select[Range[150], DigitCount[#, 9, 0]==DigitCount[#, 9, 4]&] (* Harvey P. Dale, Sep 05 2013 *)

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==4)
        a(j) = k; j = j+1;
    end
    k = k+1;
end
disp(regexprep(num2str(a'), ' +', ', ')) % Chris R. Rehmann, Mar 01 2026

Crossrefs

Cf. A007095, A039360.

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

Cf. A039086, A039092, A039097.

Sequence in context: A121518 A396183 A287770 * A093435 A048964 A028749

Adjacent sequences: A039077 A039078 A039079 * A039081 A039082 A039083

Keyword

nonn,base,easy

Author

Olivier Gérard

Status

approved