login
A039389
Numbers whose base-9 representation has the same nonzero number of 5's and 8's.
11
53, 77, 134, 158, 215, 239, 296, 320, 377, 401, 413, 422, 431, 440, 449, 467, 476, 477, 478, 479, 480, 481, 483, 484, 539, 563, 620, 644, 653, 662, 671, 680, 689, 693, 694, 695, 696, 697, 699, 700, 707, 716, 782, 806, 863, 887, 944, 968, 1025, 1049
OFFSET
1,1
LINKS
MATHEMATICA
Select[Range[1100], DigitCount[#, 9, 5]==DigitCount[#, 9, 8]>0&] (* Harvey P. Dale, May 17 2017 *)
PROG
(MATLAB) x = 0:1049; d = dec2base(x, 9)-'0'; s1 = sum(d==5, 2); s2 = sum(d==8, 2); a = x(s1==s2 & s1>0); disp(regexprep(num2str(a), ' +', ', ')) % Chris R. Rehmann, Apr 14 2026
KEYWORD
nonn,base,easy
STATUS
approved