OFFSET
1,1
COMMENTS
Nonprime digit = 0, 1, 4, 6, 8 and 9.
Zero cannot be the largest digit of any prime number. - Harvey P. Dale, Jul 14 2014
EXAMPLE
11(1=1=nonprime), 19(1<9=nonprime), 29(2<9=nonprime), 41(nonprime=4>1), etc.
MATHEMATICA
Select[Prime[Range[200]], !PrimeQ[Max[IntegerDigits[#]]]&] (* Harvey P. Dale, Jul 14 2014 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Juri-Stepan Gerasimov, Jan 19 2009
EXTENSIONS
Corrected (239 and 443 inserted) by R. J. Mathar, May 05 2010
STATUS
approved