login
Primes p such that 3*p + 8 and 8*p + 3 are primes.
1

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

%S 5,7,13,17,31,41,43,47,61,73,101,103,113,127,131,157,197,223,251,283,

%T 293,307,337,367,433,467,491,563,631,647,673,677,691,733,797,811,937,

%U 983,1097,1153,1217,1223,1231,1291,1303,1307,1361,1373

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

%H Michael De Vlieger, <a href="/A106069/b106069.txt">Table of n, a(n) for n = 1..10000</a>

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

%o (Magma) [p: p in PrimesUpTo(5000)|IsPrime(3*p+8) and IsPrime(8*p+3)] // _Vincenzo Librandi_, Jan 30 2011

%K nonn

%O 1,1

%A _Zak Seidov_, May 07 2005