login
A126435
Primes of the form n^7-n-1.
3
2097143, 1801088519, 21869999969, 42618442943, 78364164059, 137231006639, 194754273839, 435817657169, 678223072799, 1174711139783, 1727094849479, 3938980639103, 4398046511039, 4902227890559, 6722988818363, 19203908986079
OFFSET
1,1
COMMENTS
All terms end in 3 or 9. - Robert Israel, Jul 22 2019
LINKS
MAPLE
map(t -> t^7-t-1, select(t -> isprime(t^7-t-1), [$1..10^4])); # Robert Israel, Jul 22 2019
MATHEMATICA
k = 7; a = {}; Do[If[PrimeQ[x^k - x - 1], AppendTo[a, x^k - x - 1]], {x, 1, 100}]; a
Select[Table[n^7-n-1, {n, 80}], PrimeQ] (* Harvey P. Dale, Jun 20 2020 *)
KEYWORD
nonn
AUTHOR
Artur Jasinski, Dec 26 2006
STATUS
approved