login
A039384
Numbers whose base-9 representation has the same nonzero number of 4's and 6's.
10
42, 58, 123, 139, 204, 220, 285, 301, 330, 339, 348, 357, 375, 378, 379, 380, 381, 383, 385, 386, 393, 402, 447, 463, 490, 499, 508, 517, 522, 523, 524, 525, 527, 529, 530, 535, 553, 562, 609, 625, 690, 706, 771, 787, 852, 868, 933, 949, 1014, 1030, 1059, 1068
OFFSET
1,1
LINKS
MATHEMATICA
Select[Range[0, 1068], DigitCount[#, 9, 4] == DigitCount[#, 9, 6] > 0 &] (* Chris R. Rehmann, Apr 12 2026 *)
PROG
(MATLAB) x = 0:1068; d = dec2base(x, 9)-'0'; s1 = sum(d==4, 2); s2 = sum(d==6, 2); a = x(s1==s2 & s1>0); disp(regexprep(num2str(a), ' +', ', ')) % Chris R. Rehmann, Apr 12 2026
KEYWORD
nonn,base,easy
STATUS
approved