A154608 Primes p such that 11*p + 4 is also prime.

3, 5, 17, 23, 47, 53, 59, 89, 107, 137, 173, 179, 239, 263, 269, 317, 347, 383, 389, 443, 449, 479, 557, 563, 569, 617, 647, 653, 659, 677, 683, 857, 863, 929, 953, 1019, 1097, 1109, 1193, 1223, 1229, 1277, 1373, 1433, 1487, 1493, 1499, 1583, 1607, 1613, 1667

Offset

1,1

Links

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

Mathematica

Select[Prime[Range[2000]], PrimeQ[11 # + 4] &] (* Vincenzo Librandi, Mar 06 2013 *)

Prog

(Magma) [p: p in PrimesUpTo(1700)| IsPrime(11*p+4)]; // Vincenzo Librandi, Mar 06 2013
(PARI) for(n=1, 2000, if(isprime(n) && isprime(11*n+4), print1(n", "))) \\ G. C. Greubel, Sep 18 2019
(Sage) [n for n in (1..2000) if is_prime(n) and is_prime(11*n+4)] # G. C. Greubel, Sep 18 2019
(GAP) Filtered([1..2000], k-> IsPrime(k) and IsPrime(11*k+4)); # G. C. Greubel, Sep 18 2019

Crossrefs

Cf. A017437, A141851, A154607.

Sequence in context: A211440 A100564 A231232 * A024862 A025106 A333199

Adjacent sequences: A154605 A154606 A154607 * A154609 A154610 A154611

Keyword

nonn,easy

Author

Vincenzo Librandi, Jan 15 2009

Status

approved