A145478 Primes p such that (29 + p)/2 is prime.

5, 17, 29, 53, 89, 113, 137, 149, 173, 197, 233, 269, 317, 353, 449, 509, 557, 593, 677, 773, 809, 857, 929, 953, 977, 1013, 1097, 1109, 1277, 1289, 1373, 1409, 1493, 1613, 1697, 1733, 1877, 1913, 1997, 2069, 2153, 2273, 2297, 2333, 2357, 2417, 2549, 2609

Offset

1,1

Comments

All these primes are congruent to 5 mod 12.

Links

Ivan Neretin, Table of n, a(n) for n = 1..10000

Mathematica

aa = {}; k = 29; Do[If[PrimeQ[(k + Prime[n])/2], AppendTo[aa, Prime[n]]], {n, 1, 500}]; aa

Prog

(PARI) first(n)=my(t=1, p, i=1); while(i<n, p=prime(i); i=i+1; if(p>2&&isprime((29+p)/2), print1(p, ", "))) \\ Anders Hellström, Jan 22 2017

Crossrefs

Cf. A092109, A145471-A145480.

Sequence in context: A086523 A220082 A207337 * A143103 A091851 A079292

Adjacent sequences: A145475 A145476 A145477 * A145479 A145480 A145481

Keyword

nonn

Author

Artur Jasinski, Oct 11 2008

Status

approved