A155760 Primes p such that p+30 and p+60 are prime.

7, 11, 13, 23, 29, 37, 41, 43, 53, 67, 71, 79, 97, 107, 137, 151, 163, 167, 181, 197, 211, 233, 251, 277, 307, 337, 349, 359, 379, 389, 401, 419, 431, 449, 461, 541, 547, 557, 571, 587, 601, 613, 617, 631, 709, 727, 797, 823, 827, 877, 881, 907, 911, 937, 953

Offset

1,1

Comments

Subsequence of A049481. - Zak Seidov, Apr 10 2015

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Maple

A155760:=n->`if`(isprime(n) and isprime(n+30) and isprime(n+60), n, NULL): seq(A155760(n), n=1..2000); # Wesley Ivan Hurt, Apr 11 2015

Mathematica

Select[Prime[Range[1000]], PrimeQ[# +30] && PrimeQ[# + 60]&] (* Vincenzo Librandi, Oct 30 2012 *)

Prog

(Magma) [p: p in PrimesUpTo(1000) | IsPrime(p + 30) and IsPrime(p + 60)]; // Vincenzo Librandi, Oct 30 2012
(PARI) select(p->isprime(p+30)&&isprime(p+60), primes(10^3)) \\ Charles R Greathouse IV, Apr 11 2015

Crossrefs

Sequence in context: A110966 A163388 A297176 * A058500 A090865 A296716

Adjacent sequences: A155757 A155758 A155759 * A155761 A155762 A155763

Keyword

nonn,easy

Author

Vincenzo Librandi, Jan 26 2009

Status

approved