|
%I #10 Sep 08 2022 08:45:39
%S 5,17,67,107,113,317,373,577,883,1163,1373,1597,2333,3217,3797,4787,
%T 6067,7283,8363,8747,9677,9967,10247,13577,13697,13907,14207,15973,
%U 16787,16843,16937,17107,18637,18757,20347,20477,21323,21493,21737
%N Primes p such that p^3 - 24 and p^3 + 24 are also primes.
%t fQ[n_]:=PrimeQ[n^3-24]&&PrimeQ[n^3+24];lst={};Do[If[fQ@Prime[n],AppendTo[lst,Prime[n]]],{n,8!}];lst
%o (Magma) [p: p in PrimesUpTo(50000)|IsPrime(p^3-24) and IsPrime(p^3+24)] // _Vincenzo Librandi_, Jan 30 2011
%Y Cf. A153116, A153119, A153120, A153320, A153321, A153322.
%K nonn
%O 1,1
%A _Vladimir Joseph Stephan Orlovsky_, Dec 23 2008
|
