A089152 Primes p such that 6*p-7 and 6*p-5 are twin primes and p is also a twin prime.

3, 11, 13, 19, 31, 41, 59, 71, 73, 101, 139, 193, 239, 269, 271, 313, 349, 433, 521, 643, 823, 829, 881, 1051, 1061, 1093, 1621, 1669, 1723, 1951, 2549, 2999, 3359, 3373, 3463, 3469, 3583, 4019, 4219, 4481, 4483, 4519, 5233, 5639, 5881, 6089, 6131, 6133

Offset

1,1

Links

Robert Israel, Table of n, a(n) for n = 1..5462

Example

6*19-7 = 107, 6*19-5 = 109, 107 and 109 are twin primes and 19 has 17 as twin.

Maple

P:= {seq(ithprime(i), i=1..20000)}:
A:= P intersect (map(`-`, P, 2) union map(`+`, P, 2)) intersect map(t -> (t+5)/6, P) intersect map(t -> (t+7)/6, P):
sort(convert(A, list)); # Robert Israel, Jan 16 2019

Prog

(Magma) [p: p in PrimesUpTo(6500) |(IsPrime(p-2) or  IsPrime(p+2)) and IsPrime(6*p-5) and IsPrime(6*p-7)]; // Vincenzo Librandi, Jan 17 2019

Crossrefs

Subsequence of A089151.

Sequence in context: A067386 A063621 A176870 * A066594 A329761 A167612

Adjacent sequences: A089149 A089150 A089151 * A089153 A089154 A089155

Keyword

easy,nonn

Author

Pierre CAMI, Dec 06 2003

Extensions

2 and 173 removed by R. J. Mathar, Nov 13 2009

Status

approved