|
|
A126422
|
|
Primes of the form k^4-k-1.
|
|
11
|
|
|
13, 251, 619, 1289, 2393, 6551, 14629, 28547, 65519, 159979, 279817, 456949, 2313401, 2559959, 3111653, 3748051, 6249949, 7890427, 9150569, 10555943, 12959939, 13845779, 21381307, 25411609, 35152963, 38950001, 45212093
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
a = {}; Do[If[PrimeQ[x^4 - x - 1], AppendTo[a, x^4 - x - 1]], {x, 1, 100}]; a
Select[Table[n^4-n-1, {n, 100}], PrimeQ] (* Harvey P. Dale, Aug 27 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|