A126434 Primes of the form k^6-k-1.
61, 4091, 15619, 46649, 2985971, 16777199, 24137551, 63999979, 4750104199, 8303765579, 27680640569, 30840979399, 34296447191, 68719476671, 117648999929, 351298031531, 377149515539, 606355001251, 689869780961
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
k = 6; a = {}; Do[If[PrimeQ[x^k - x - 1], AppendTo[a, x^k - x - 1]], {x, 1, 100}]; a Select[Table[n^6-n-1,{n,200}],PrimeQ] (* Harvey P. Dale, Mar 28 2013 *)