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

1, 2, 3, 4, 5, 7, 8, 10, 11, 12, 13, 14, 16, 17, 19, 20, 21, 22, 23, 25, 26, 28, 29, 30, 31, 32, 34, 35, 37, 38, 39, 40, 41, 43, 44, 46, 47, 48, 49, 50, 52, 53, 54, 64, 65, 66, 67, 68, 70, 71, 73, 74, 75, 76, 77, 79, 80, 87, 91, 92, 93, 94, 95, 97, 98, 100, 101, 102, 103

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, 6]&] (* Harvey P. Dale, Oct 20 2014 *)

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

Crossrefs

Cf. A007095, A039362.

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

Cf. A039088, A039094, A039099, A039103, A039106.

Sequence in context: A039202 A039152 A051705 * A340608 A047503 A228803

Adjacent sequences: A039079 A039080 A039081 * A039083 A039084 A039085

Keyword

nonn,base,easy

Author

Olivier Gérard

Status

approved