%I #13 Sep 08 2022 08:46:04
%S 0,1,3,16,36,244,315,2577,9500,17596,25551,32193,32835,36504,75136
%N Numbers n such that 7^n + 6 is prime.
%C a(16) > 10^5. - _Robert Price_, Jan 24 2014
%t Select[Range[0, 5000], PrimeQ[7^# + 6] &]
%o (PARI) for(n=1, 5000, if(isprime(7^n+6), print1(n", ")))
%o (Magma) /* The code produces the sequence up to 315: */ [n: n in [0..2000] | IsPrime(7^n+6)];
%Y Cf. A236371, A217131, A191469, A090669, A096305, A217130, A217132, A152213.
%K nonn
%O 1,3
%A _Vincenzo Librandi_, Oct 01 2012
%E a(9)-a(15) from _Robert Price_, Jan 24 2014
|