A217134 Numbers n such that 5^n - 8 is prime.
2, 4, 10, 14, 88, 112, 140, 764, 3040, 11096, 24934, 25616, 54584, 93400
Offset: 1
Keywords
Programs
-
Mathematica
Select[Range[2, 5000], PrimeQ[5^# - 8] &]
-
PARI
for(n=2, 5*10^3, if(isprime(5^n-8), print1(n", ")))
Extensions
a(10)-a(14) from Robert Price, Feb 03 2014
Comments