OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[ Range[ 1325 ], (Count[ IntegerDigits[ #, 5 ], 2 ]==3)& ]
FromDigits[#, 5]&/@Select[Tuples[Range[0, 4], 5], Count[#, 2]==3&] (* Harvey P. Dale, Jan 17 2023 *)
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
STATUS
approved