A125955 Numbers k such that (2^k + 7^k)/9 is prime.
5, 23, 73, 101, 401, 419, 457, 811, 1163, 1511, 8011
Offset: 1
Crossrefs
Programs
-
Mathematica
Do[p=Prime[n];f=(2^p+7^p)/9; If[PrimeQ[f], Print[{p, f}]], {n, 1, 1000}]
-
PARI
is(n)=ispseudoprime((2^n+7^n)/9) \\ Charles R Greathouse IV, Jun 13 2017
Extensions
More terms from Ryan Propper, Mar 23 2007
Comments