login
Primes p such that 3*p + 26 and 26*p + 3 are primes.
0

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

%S 29,41,109,139,151,179,191,239,331,359,379,401,421,449,569,659,701,

%T 769,811,839,1019,1171,1231,1301,1409,1499,1549,1759,1831,1871,1889,

%U 2029,2039,2099,2269,2311,2351,2699,2879,3061,3089,3259,3271,3301,3359,3371

%N Primes p such that 3*p + 26 and 26*p + 3 are primes.

%t Select[Prime[Range[220]], PrimeQ[26#+3]&&PrimeQ[3#+26]&]

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

%K nonn

%O 1,1

%A _Zak Seidov_, May 07 2005