A128352 Numbers k such that (17^k - 5^k)/12 is prime.
5, 7, 17, 23, 43, 71, 239, 733, 1097
Offset: 1
Crossrefs
Programs
-
Mathematica
k=17; Do[p=Prime[n]; f=(k^p-5^p)/(k-5); If[ PrimeQ[f], Print[p] ], {n,1,100}]
-
PARI
is(n)=isprime((17^n-5^n)/12) \\ Charles R Greathouse IV, Feb 17 2017
Comments