A228558 Numbers k such that (17^k + 4^k)/21 is prime.
13, 61, 67, 107, 383, 647, 3571, 37967
Offset: 1
Programs
-
Mathematica
Select[ Prime[ Range[1, 100000] ], PrimeQ[ (17^# + 4^#)/21 ]& ]
-
PARI
is(n)=ispseudoprime((17^n+4^n)/21) \\ Charles R Greathouse IV, May 22 2017
Comments