login
A155943
Primes p such that 16*p + 1 is also prime.
5
7, 37, 61, 97, 151, 163, 181, 193, 271, 313, 331, 337, 397, 421, 487, 523, 547, 571, 643, 691, 727, 757, 853, 877, 967, 1033, 1087, 1093, 1231, 1237, 1297, 1303, 1423, 1471, 1567, 1657, 1747, 1777, 1801, 1831, 1867, 1987, 2083, 2113, 2221, 2251, 2281, 2437
OFFSET
1,1
LINKS
MATHEMATICA
Select[Prime[Range[2500]], PrimeQ[(16*# + 1)]&] (* Vincenzo Librandi, Oct 30 2012 *)
PROG
(Magma) [p: p in PrimesUpTo(2500)| IsPrime(16*p + 1)]; // Vincenzo Librandi, Oct 30 2012
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Jan 31 2009
STATUS
approved