login
A230581
Numbers n such that n^10 - n - 1 is prime.
0
2, 4, 5, 6, 7, 14, 22, 25, 40, 47, 50, 57, 60, 69, 71, 76, 102, 107, 111, 114, 127, 137, 146, 152, 172, 189, 196, 197, 207, 212, 231, 251, 267, 277, 284, 291, 294, 296, 307, 309, 316, 319, 324, 371, 386, 392, 397, 412, 414, 445, 447, 467, 481, 494, 524, 527
OFFSET
1,1
MATHEMATICA
Select[Range[600], PrimeQ[#^10-#-1]&] (* Harvey P. Dale, Aug 20 2021 *)
PROG
(PARI) for(n=1, 10^3, if(isprime(n^10-n-1), print1(n, ", "))); \\ Joerg Arndt, Oct 24 2013
CROSSREFS
Sequence in context: A134532 A282278 A268448 * A361825 A248962 A323455
KEYWORD
nonn
AUTHOR
Edward Jiang, Oct 23 2013
STATUS
approved