|
|
A132242
|
|
Twin primes congruent to {17, 19} mod 30.
|
|
6
|
|
|
17, 19, 107, 109, 137, 139, 197, 199, 227, 229, 347, 349, 617, 619, 827, 829, 857, 859, 1277, 1279, 1427, 1429, 1487, 1489, 1607, 1609, 1667, 1669, 1697, 1699, 1787, 1789, 1877, 1879, 1997, 1999, 2027, 2029, 2087, 2089, 2237, 2239, 2267, 2269, 2657, 2659
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
a[0] = 7; 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 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|