OFFSET
1,2
MATHEMATICA
Select[Union[Mod[#, 100]&/@Select[4Range[200]+1, PrimeQ]], #!=5&] (* Harvey P. Dale, Apr 02 2011 *)
CROSSREFS
KEYWORD
fini,full,nonn,base
AUTHOR
Lekraj Beedassy, Jan 19 2008
STATUS
approved