A229612 Numbers n such that (19^n + 5^n)/24 is prime.
11, 37, 107, 181, 449, 457, 3583, 9133, 10139, 99689
Offset: 1
Programs
-
Mathematica
k=19; Do[p=Prime[n]; f=(k^p+5^p)/(k+5); If[ PrimeQ[f], Print[p] ], {n, 1, 9592}] -
PARI
is(n)=ispseudoprime((19^n+5^n)/24) \\ Charles R Greathouse IV, Jun 13 2017
Comments