login
A132243
Twin primes congruent to {1, 29} mod 30.
6
29, 31, 59, 61, 149, 151, 179, 181, 239, 241, 269, 271, 419, 421, 569, 571, 599, 601, 659, 661, 809, 811, 1019, 1021, 1049, 1051, 1229, 1231, 1289, 1291, 1319, 1321, 1619, 1621, 1949, 1951, 2129, 2131, 2309, 2311, 2339, 2341, 2549, 2551, 2729, 2731, 2789
OFFSET
1,1
COMMENTS
Twin primes of the form 5n +- 1. [Bruno Berselli, Aug 26 2014]
MATHEMATICA
a[0] = 9; a[n_] := a[n] = a[n - 1] + 10; Flatten[Table[If[PrimeQ[a[n]] && PrimeQ[a[n] + 2], {a[n], a[n] + 2}, {}], {n, 0, 1000}]] - Roger L. Bagula, May 04 2008
Flatten[Select[#+{-1, 1}&/@(5*Range[0, 600, 2]), AllTrue[#, PrimeQ]&]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Feb 21 2020 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Omar E. Pol, Aug 15 2007
EXTENSIONS
More terms from Roger L. Bagula, May 04 2008
STATUS
approved