OFFSET
1,3
LINKS
Chris R. Rehmann, Table of n, a(n) for n = 1..10000
MATHEMATICA
Select[Range[0, 150], DigitCount[#, 9, 5]==DigitCount[#, 9, 8]&] (* Harvey P. Dale, Aug 28 2020 *)
PROG
(MATLAB) x = 0:21523; d = dec2base(x, 9)-'0'; a = x(sum(d==5, 2)==sum(d==8, 2)); disp(regexprep(num2str(a), ' +', ', ')) % Chris R. Rehmann, Mar 25 2026
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
STATUS
approved
