A125966 Numbers k for which k^10+k^9-1 is prime.

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

Amiram Eldar, Table of n, a(n) for n = 1..10000

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

Crossrefs

Cf. A000040, A045546, A125881-A125885, A125965-A125973.

Sequence in context: A038464 A366633 A360037 * A259725 A260936 A043001

Adjacent sequences: A125963 A125964 A125965 * A125967 A125968 A125969

Keyword

nonn

Author

Artur Jasinski, Dec 14 2006

Extensions

More terms from Amiram Eldar, Mar 18 2020

Status

approved