A224691 Numbers n such that (13^n - 4^n)/9 is prime.
2, 5, 19, 109, 157, 8521, 26017, 26177
Offset: 1
Crossrefs
Programs
-
Mathematica
Select[Prime[Range[1, 100000]], PrimeQ[(13^# - 4^#)/9]&]
-
PARI
is(n)=ispseudoprime((13^n-4^n)/9) \\ Charles R Greathouse IV, Jun 13 2017
Comments