login
A274215
Numbers n such that 8^n + 7^(n+1) is prime.
0
4, 6, 46, 58, 184, 336, 29274, 98928
OFFSET
1,1
COMMENTS
a(9) > 10^5.
MATHEMATICA
Select[Range[0, 100000], PrimeQ[8^# + 7^(# + 1)] &]
PROG
(PARI) is(n)=ispseudoprime(8^n+7^(n+1)) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
Cf. A093765.
Sequence in context: A012935 A013166 A174653 * A119944 A338814 A134592
KEYWORD
nonn,more
AUTHOR
Robert Price, Jun 13 2016
STATUS
approved