A128343 Numbers k such that (14^k + 5^k)/19 is prime.
3, 7, 17, 79, 17477, 19319, 49549
Offset: 1
Crossrefs
Programs
-
Mathematica
k=14; Do[p=Prime[n]; f=(k^p+5^p)/(k+5); If[ PrimeQ[f], Print[p] ], {n,1,100}]
-
PARI
is(n)=isprime((14^n+5^n)/19) \\ Charles R Greathouse IV, Feb 17 2017
Extensions
a(5)-a(7) from Robert Price, May 20 2013
Comments