A166005 Primes p such that 8*p+15 is also a prime.

2, 7, 11, 17, 19, 23, 31, 37, 43, 53, 59, 61, 73, 79, 89, 101, 103, 109, 113, 127, 131, 151, 163, 173, 179, 191, 193, 199, 227, 229, 233, 311, 317, 331, 337, 347, 359, 373, 383, 397, 431, 439, 443, 449, 457, 463, 479, 487, 491, 499, 547, 563, 569, 571, 593, 607

Offset

1,1

Links

G. C. Greubel, Table of n, a(n) for n = 1..10000

Mathematica

f[n_]:=PrimeQ[8*n+15]; lst={}; Do[p=Prime[n]; If[f[p], AppendTo[lst, p]], {n, 6!}]; lst

Prog

(Magma) [p: p in PrimesUpTo(1000)|IsPrime(8*p+15)] // Vincenzo Librandi, Jan 29 2011

Crossrefs

Sequence in context: A357843 A176897 A362770 * A243009 A155009 A045371

Adjacent sequences: A166002 A166003 A166004 * A166006 A166007 A166008

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Oct 03 2009

Extensions

Edited by N. J. A. Sloane, Oct 04 2009

Status

approved