%I #8 Dec 03 2017 12:02:52
%S 0,1,2,9,66,164,221,224,2058,3224,12284,13457,22277,22761,83381
%N Numbers n such that 7^n + 12 is prime.
%C a(16) > 10^5. - _Robert Price_, Jan 24 2014
%t Select[Range[0,84000],PrimeQ[7^#+12]&] (* _Harvey P. Dale_, Dec 03 2017 *)
%o (PARI) is(n)=ispseudoprime(7^n+12) \\ _Charles R Greathouse IV_, Feb 17 2017
%Y Cf. A236371, A217131, A191469, A090669, A096305, A217130, A217132, A152213.
%K nonn,more
%O 1,3
%A Huseyin Azoguz (huseyin(AT)mmnetz.de), Nov 29 2008
%E a(11)-a(15) from _Robert Price_, Jan 24 2014
|