OFFSET
1,1
MATHEMATICA
Select[Range[2500], Max[DigitCount[#]] > 2 &] (* Giovanni Resta, Aug 25 2017 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Enrique Navarrete, Aug 21 2017
STATUS
approved