A132259 Isolated primes congruent to {1, 17, 19, 29} mod 30.
47, 79, 89, 167, 211, 257, 317, 331, 359, 379, 389, 409, 439, 449, 467, 479, 499, 509, 541, 557, 587, 631, 647, 677, 691, 709, 719, 739, 751, 769, 797, 839, 887, 919, 929, 947, 977, 991, 1009, 1039, 1069, 1097, 1109, 1129, 1171, 1187
Offset: 1
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
- C. K. Caldwell, The Prime Pages.
- Omar E. Pol, Determinacion geometrica de los numeros primos y perfectos.
Programs
-
Mathematica
Select[Prime[Range[200]],NoneTrue[#+{2,-2},PrimeQ]&&MemberQ[ {1,17,19,29},Mod[ #,30]]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Mar 04 2019 *)