login
A088175
Primes such that the next two primes are a twin prime pair.
4
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,1
COMMENTS
Primes p such that nextprime(p) + 2 is prime. - Irina Gerasimova, Jun 28 2013
LINKS
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 *)
PROG
(PARI) is(n)=isprime(n) && isprime(nextprime(n+1)+2) \\ Charles R Greathouse IV, Jun 28 2013
(Magma) [NthPrime(n): n in [1..260] | NthPrime(n+2)-NthPrime(n+1) eq 2]; // Vincenzo Librandi, Nov 18 2014
CROSSREFS
Cf. A088176.
Sequence in context: A291544 A208149 A144104 * A271827 A298339 A091440
KEYWORD
easy,nonn
AUTHOR
Zak Seidov, Sep 22 2003
EXTENSIONS
More terms from Ray Chandler, Sep 25 2003
Definition clarified by Irina Gerasimova, Jun 28 2013
STATUS
approved