A119570 Primes p such that p^2 - p - 1 is not prime.
2, 13, 19, 23, 37, 41, 43, 53, 59, 73, 79, 83, 89, 103, 107, 109, 113, 137, 151, 157, 163, 167, 173, 179, 191, 193, 199, 211, 223, 227, 229, 233, 239, 251, 257, 263, 271, 277, 281, 283, 293, 311, 313, 317, 337, 347, 349, 353, 367, 373, 383, 389, 401, 431, 433
Offset: 1
Keywords
Crossrefs
Programs
-
Magma
[p: p in PrimesUpTo(700)| not IsPrime(p^2-p-1)] // Vincenzo Librandi, Jan 29 2011
-
Mathematica
Select[Prime[Range[250]], Not[PrimeQ[ #^2-#-1]]&]