OFFSET
1,3
MATHEMATICA
Select[Range[0, 100], DigitCount[#, 12, 8]==DigitCount[#, 12, 9]&] (* Harvey P. Dale, Jan 13 2021 *)
PROG
(Python)
from itertools import count, islice
from sympy.ntheory import digits
def A039269_gen(startvalue=0): # generator of terms >= startvalue
return filter(lambda n:(s:=digits(n, 12)[1:]).count(8)==s.count(9), count(max(startvalue, 0)))
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
STATUS
approved