A088175 Primes such that the next two primes are a twin prime pair.

2, 3, 7, 13, 23, 37, 53, 67, 97, 103, 131, 139, 173, 181, 193, 223, 233, 263, 277, 307, 337, 409, 421, 457, 509, 563, 593, 613, 631, 653, 797, 811, 823, 853, 877, 1013, 1021, 1039, 1051, 1087, 1129, 1223, 1259, 1283, 1297, 1307, 1423, 1447, 1471, 1483, 1601

Offset: 1

Author

Zak Seidov, Sep 22 2003

Keywords

• easy
• nonn

Comments

Primes p such that nextprime(p) + 2 is prime. - Irina Gerasimova, Jun 28 2013

Links

• Amiram Eldar, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A088176.

Programs

Magma

[NthPrime(n): n in [1..260] | NthPrime(n+2)-NthPrime(n+1) eq 2]; // Vincenzo Librandi, Nov 18 2014

Maple

A088175 := proc(n)
    prevprime(A001359(n)) ;
end proc:
seq(A088175(n),n=1..30) ; # R. J. Mathar, Nov 26 2014

Mathematica

fQ[n_]:=PrimeQ[NextPrime[n]+2];Select[Prime@Range@500,fQ] (* Vladimir Joseph Stephan Orlovsky, Apr 16 2011 *)

PARI

is(n)=isprime(n) && isprime(nextprime(n+1)+2) \\ Charles R Greathouse IV, Jun 28 2013

Extensions

More terms from Ray Chandler, Sep 25 2003

Definition clarified by Irina Gerasimova, Jun 28 2013