A217130 Numbers n such that 7^n + 6 is prime.
0, 1, 3, 16, 36, 244, 315, 2577, 9500, 17596, 25551, 32193, 32835, 36504, 75136
Offset: 1
Keywords
Programs
-
Magma
/* The code produces the sequence up to 315: */ [n: n in [0..2000] | IsPrime(7^n+6)];
-
Mathematica
Select[Range[0, 5000], PrimeQ[7^# + 6] &]
-
PARI
for(n=1, 5000, if(isprime(7^n+6), print1(n", ")))
Extensions
a(9)-a(15) from Robert Price, Jan 24 2014
Comments