login
A125966
Numbers k for which k^10+k^9-1 is prime.
2
4, 10, 13, 15, 16, 31, 36, 59, 65, 73, 90, 91, 95, 104, 105, 118, 119, 123, 125, 164, 185, 189, 199, 216, 230, 246, 254, 279, 295, 296, 298, 300, 331, 338, 344, 356, 361, 374, 384, 409, 413, 431, 435, 441, 485, 501, 519, 521, 525, 583, 599, 609, 619, 625, 636
OFFSET
1,1
LINKS
MATHEMATICA
Do[If[PrimeQ[x^10 + x^9 - 1], Print[x]], {x, 1, 400}]
PROG
(PARI) is(n)=isprime(n^10+n^9-1) \\ Charles R Greathouse IV, May 15 2013
KEYWORD
nonn
AUTHOR
Artur Jasinski, Dec 14 2006
EXTENSIONS
More terms from Amiram Eldar, Mar 18 2020
STATUS
approved