A106079 Primes p such that 5*p + 6 and 6*p + 5 are primes.

7, 11, 13, 29, 37, 41, 79, 83, 97, 107, 113, 137, 139, 151, 163, 181, 193, 197, 239, 263, 347, 373, 389, 401, 421, 431, 443, 449, 487, 503, 541, 557, 643, 653, 701, 821, 839, 883, 911, 1033, 1051, 1093, 1129, 1163, 1201, 1217, 1259, 1283, 1303, 1373

Offset

1,1

Links

Edward Jiang, Table of n, a(n) for n = 1..10000

Maple

select(n -> isprime(n) and isprime(5*n+6) and isprime(6*n+5), [seq(2*i+1, i=1..1000)]); # Robert Israel, Aug 04 2014

Mathematica

Select[Prime[Range[220]], PrimeQ[6#+5]&&PrimeQ[5#+6]&]

Prog

(Magma) [p: p in PrimesUpTo(5000)|IsPrime(5*p+6) and IsPrime(6*p+5)] // Vincenzo Librandi, Jan 30 2011
(PARI) forprime(p=1, 10^4, if(isprime(5*p+6)&&isprime(6*p+5), print1(p, ", "))) \\ Derek Orr, Aug 04 2014

Crossrefs

Intersection of A023219 and A023221. - Michel Marcus, Nov 06 2018

Sequence in context: A090865 A296716 A191062 * A235478 A045459 A322172

Adjacent sequences: A106076 A106077 A106078 * A106080 A106081 A106082

Keyword

nonn,easy

Author

Zak Seidov, May 07 2005

Status

approved