login
Primes p such that 1*p + 14 and 14*p + 1 are primes.
0

%I #15 Sep 08 2022 08:45:17

%S 3,5,17,47,53,59,83,113,149,167,269,353,419,443,449,509,563,587,599,

%T 647,659,677,719,797,977,983,1103,1109,1187,1223,1289,1367,1409,1433,

%U 1439,2039,2099,2237,2297,2357,2423,2543,2579,2657,2753,2789,2837,2957,3023

%N Primes p such that 1*p + 14 and 14*p + 1 are primes.

%t Select[Prime[Range[220]], PrimeQ[14#+1]&&PrimeQ[1#+14]&]

%o (Magma) [p: p in PrimesUpTo(10000)| IsPrime(p+14) and IsPrime(14*p+1)]; // _Vincenzo Librandi_, Nov 13 2010

%Y Sunsequence of A153417. - _Michel Marcus_, Jan 20 2018

%K nonn

%O 1,1

%A _Zak Seidov_, May 07 2005