OFFSET
1,1
LINKS
Seiichi Manyama, Table of n, a(n) for n = 1..10000
MATHEMATICA
Select[ Range[ 672 ], (Count[ IntegerDigits[ #, 4 ], 2 ]==3)& ]
Select[Range[750], DigitCount[#, 4, 2]==3&] (* Harvey P. Dale, Dec 21 2022 *)
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
STATUS
approved
