|
%I #11 Sep 08 2022 08:45:25
%S 2,13,19,23,37,41,43,53,59,73,79,83,89,103,107,109,113,137,151,157,
%T 163,167,173,179,191,193,199,211,223,227,229,233,239,251,257,263,271,
%U 277,281,283,293,311,313,317,337,347,349,353,367,373,383,389,401,431,433
%N Primes p such that p^2 - p - 1 is not prime.
%t Select[Prime[Range[250]], Not[PrimeQ[ #^2-#-1]]&]
%o (Magma) [p: p in PrimesUpTo(700)| not IsPrime(p^2-p-1)] // _Vincenzo Librandi_, Jan 29 2011
%Y Cf. A091567 (Primes p such that p^2-p-1 is prime),
%Y A091568 (Primes of the form p^2-p-1, where p is prime).
%K nonn
%O 1,1
%A _Alexander Adamchuk_, Jul 27 2006
|
