A125971 Numbers k for which k^14+k^13-1 is prime.

6, 9, 11, 21, 29, 33, 36, 49, 64, 66, 68, 80, 110, 113, 144, 240, 266, 270, 309, 348, 365, 366, 394, 426, 438, 459, 471, 474, 479, 485, 501, 548, 553, 570, 593, 660, 684, 699, 704, 725, 729, 743, 783, 798, 801, 809, 815, 820, 824, 833, 841, 891, 900, 931, 968

Offset: 1

Author

Artur Jasinski, Dec 14 2006

Keywords

• nonn

Links

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

Crossrefs

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

Programs

Mathematica

Do[If[PrimeQ[x^14 + x^13 - 1], Print[x]], {x, 1, 600}]

PARI

is(n)=isprime(n^14+n^13-1) \\ Charles R Greathouse IV, May 15 2013

Extensions

More terms from Amiram Eldar, Mar 18 2020