login
A039359
Numbers whose base-9 representation has the same nonzero number of 0's and 3's.
11
27, 84, 108, 165, 189, 244, 245, 247, 248, 249, 250, 251, 252, 261, 279, 288, 297, 306, 315, 327, 351, 408, 432, 489, 513, 570, 594, 651, 675, 741, 750, 757, 758, 760, 761, 762, 763, 764, 768, 777, 786, 795, 804, 813, 837, 894, 918, 973, 974, 976, 977, 978
OFFSET
1,1
LINKS
MATHEMATICA
Select[Range[1000], DigitCount[#, 9, 0]==DigitCount[#, 9, 3]>0&] (* Harvey P. Dale, Sep 23 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==3);
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
KEYWORD
nonn,base,easy
STATUS
approved