[go: up one dir, main page]

login
A125971
Numbers k for which k^14+k^13-1 is prime.
1
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,1
LINKS
MATHEMATICA
Do[If[PrimeQ[x^14 + x^13 - 1], Print[x]], {x, 1, 600}]
PROG
(PARI) is(n)=isprime(n^14+n^13-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