A145475 Primes p such that (17+p)/2 is prime.

5, 17, 29, 41, 89, 101, 149, 197, 257, 281, 317, 449, 461, 509, 521, 569, 617, 677, 701, 761, 821, 881, 941, 1097, 1109, 1181, 1217, 1277, 1289, 1301, 1601, 1637, 1697, 1709, 1877, 1889, 1949, 2081, 2309, 2357, 2417, 2441, 2549, 2621, 2729, 2801, 2837, 2861

Offset

1,1

Comments

All these primes are congruent to 5 mod 12.

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Mathematica

aa = {}; k = 17; Do[If[PrimeQ[(k + Prime[n])/2], AppendTo[aa, Prime[n]]], {n, 1, 500}]; aa
Select[Prime[Range[500]], PrimeQ[(17+#)/2]&] (* Harvey P. Dale, Jan 02 2013 *)

Crossrefs

Cf. A092109, A145471-A145480.

Sequence in context: A145471 A126193 A074965 * A071695 A242025 A027703

Adjacent sequences: A145472 A145473 A145474 * A145476 A145477 A145478

Keyword

nonn

Author

Artur Jasinski, Oct 11 2008

Status

approved