OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..5000
MATHEMATICA
Select[ Range[ 150 ], (Count[ IntegerDigits[ #, 5 ], 4 ]==1)& ]
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
STATUS
approved