A128354 Numbers k such that (19^k - 5^k)/14 is prime.
5, 17, 31, 59, 373, 643, 2843, 5209, 85009
Offset: 1
Crossrefs
Programs
-
Mathematica
k=19; Do[p=Prime[n]; f=(k^p-5^p)/(k-5); If[ PrimeQ[f], Print[p] ], {n,1,100}]
-
PARI
is(n)=isprime((19^n-5^n)/14) \\ Charles R Greathouse IV, Feb 17 2017
Extensions
a(7)-a(9) from Robert Price, Jul 22 2013
Comments