A156300 Primes p such that 4*p - 5 is also prime.

2, 3, 7, 13, 19, 43, 61, 67, 79, 97, 109, 127, 151, 163, 181, 211, 223, 229, 277, 307, 331, 373, 379, 397, 457, 463, 523, 601, 607, 613, 673, 727, 733, 751, 757, 853, 883, 907, 919, 967, 1021, 1033, 1069, 1117, 1171, 1201, 1231, 1237, 1321, 1327, 1381, 1399

Offset

1,1

Links

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

Mathematica

Select[Prime[Range[1400]], PrimeQ[(4# - 5)]&] (* Vincenzo Librandi, Oct 31 2012 *)

Prog

(Magma) [p: p in PrimesUpTo(1400) | IsPrime(4*p - 5)]; // Vincenzo Librandi, Oct 31 2012

Crossrefs

Cf. A156287, A156288.

Sequence in context: A019383 A249749 A171817 * A067834 A070754 A325875

Adjacent sequences: A156297 A156298 A156299 * A156301 A156302 A156303

Keyword

nonn,easy

Author

Vincenzo Librandi, Feb 07 2009

Status

approved