A274215 Numbers n such that 8^n + 7^(n+1) is prime.
4, 6, 46, 58, 184, 336, 29274, 98928
Offset: 1
Crossrefs
Cf. A093765.
Programs
-
Mathematica
Select[Range[0, 100000], PrimeQ[8^# + 7^(# + 1)] &]
-
PARI
is(n)=ispseudoprime(8^n+7^(n+1)) \\ Charles R Greathouse IV, Jun 13 2017
Comments