A236761 Numbers n such that n^4-n+1 is prime.
3, 6, 9, 13, 16, 18, 19, 24, 33, 39, 43, 45, 46, 60, 63, 64, 69, 75, 78, 79, 85, 91, 94, 105, 106, 108, 109, 115, 121, 129, 138, 174, 175, 183, 195, 198, 205, 210, 220, 249, 250, 276, 289, 295, 300, 309, 313, 318, 324, 343, 346, 348
Offset: 1
Keywords
Examples
115^4 - 115 + 1 = 174900511 is prime. Thus, 115 is a member of this sequence.
Programs
-
Mathematica
Select[Range[400],PrimeQ[#^4-#+1]&] (* Harvey P. Dale, Jun 03 2015 *)
-
PARI
s=[]; for(n=1, 400, if(isprime(n^4-n+1), s=concat(s, n))); s \\ Colin Barker, Jan 31 2014
-
Python
import sympy from sympy import isprime {print(n) for n in range(10**3) if isprime(n**4-n+1)}