A236371 Numbers n such that 7^n - 12 is prime.
2, 3, 4, 12, 27, 28, 34, 36, 147, 179, 242, 276, 278, 466, 735, 2371, 4548, 5606, 10324, 82899
Offset: 1
Keywords
Programs
-
Mathematica
Select[Range[1, 100000], PrimeQ[7^# - 12] &]
-
PARI
for(n=1, 5*10^5, if(isprime(7^n-12), print1(n, ", ")))
Comments