OFFSET
1,1
LINKS
Nathaniel Johnston, Table of n, a(n) for n = 1..10000
MAPLE
seq(`if`(numboccur(3, convert(n, base, 5))=2, n, NULL), n=0..450); # Nathaniel Johnston, Jun 27 2011
MATHEMATICA
Select[ Range[ 450 ], (Count[ IntegerDigits[ #, 5 ], 3 ]==2)& ]
Select[Range[500], DigitCount[#, 5, 3]==2&] (* Harvey P. Dale, Mar 24 2021 *)
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
STATUS
approved