login
A126434
Primes of the form k^6-k-1.
5
61, 4091, 15619, 46649, 2985971, 16777199, 24137551, 63999979, 4750104199, 8303765579, 27680640569, 30840979399, 34296447191, 68719476671, 117648999929, 351298031531, 377149515539, 606355001251, 689869780961
OFFSET
1,1
LINKS
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 *)
KEYWORD
nonn
AUTHOR
Artur Jasinski, Dec 26 2006
STATUS
approved