|
%I #12 Aug 01 2021 13:38:41
%S 179,15269,32609,36779,46439,50549,52859,55619,65579,67409,69149,
%T 104759,104849,112289,128519,211049,213359,223679,260549,267899,
%U 287279,295079,326939,333719,349379,376469,407789,413069,415949,433049,454229,460949,482399
%N Primes p such that p+2, p*(p+2) + 12 and p*(p+2) + 14 are also prime.
%t Select[Prime[Range[41000]],AllTrue[{#+2,#(#+2)+12,#(#+2)+14},PrimeQ]&] (* _Harvey P. Dale_, Aug 01 2021 *)
%o (PARI) isok(n) = isprime(n) && isprime(n+2) && isprime(n*(n+2)+12) && isprime(n*(n+2)+14); \\ _Michel Marcus_, Aug 09 2013
%Y Cf. A001359, A130737.
%K nonn
%O 1,1
%A _Ray G. Opao_, Jul 06 2007
%E More terms from _Michel Marcus_, Aug 09 2013
|
