login
A132255
Isolated primes congruent to {17, 19} mod 30.
1
47, 79, 167, 257, 317, 379, 409, 439, 467, 499, 557, 587, 647, 677, 709, 739, 769, 797, 887, 919, 947, 977, 1009, 1039, 1069, 1097, 1129, 1187, 1217, 1249, 1307, 1367, 1399, 1459, 1549, 1579, 1637, 1759, 1847, 1907, 2179, 2207, 2297
OFFSET
1,1
MATHEMATICA
Select[Prime[Range[500]], NoneTrue[#+{2, -2}, PrimeQ]&&MemberQ[{17, 19}, Mod[#, 30]]&]
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Omar E. Pol, Aug 20 2007
STATUS
approved