login
A039386
Numbers whose base-9 representation has the same nonzero number of 4's and 8's.
12
44, 76, 125, 157, 206, 238, 287, 319, 332, 341, 350, 359, 377, 386, 395, 396, 397, 398, 399, 401, 402, 403, 449, 481, 530, 562, 611, 643, 652, 661, 670, 679, 684, 685, 686, 687, 689, 690, 691, 697, 706, 715, 773, 805, 854, 886, 935, 967, 1016, 1048
OFFSET
1,1
LINKS
MATHEMATICA
Select[Range[1250], DigitCount[#, 9, 4]==DigitCount[#, 9, 8]>0&] (* Harvey P. Dale, Jan 18 2024 *)
PROG
(MATLAB) x = 0:1048; d = dec2base(x, 9)-'0'; s1 = sum(d==4, 2); s2 = sum(d==8, 2); a = x(s1==s2 & s1>0); disp(regexprep(num2str(a), ' +', ', ')) % Chris R. Rehmann, Apr 13 2026
KEYWORD
nonn,base,easy
STATUS
approved