OFFSET
1,1
MATHEMATICA
Select[Range[11, 50000, 111], PrimeQ]
PROG
(Magma) [p: p in PrimesUpTo(25000) | p mod 111 in {11} ]; // Vincenzo Librandi, Apr 05 2015
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Harvey P. Dale, Dec 24 2014
STATUS
approved