A084125 - OEIS

%I #12 Sep 11 2019 15:51:41

%S 1,3,6,7,11,29,106,111,138,966,1203,2719,3357,11445,15066,16837,36750

%N Numbers n such that 13*3^n + 2 is prime.

%C Values corresponding to 29, 106, 111, 138, 966, 1203 and 2719 (1299 digits) have been certified prime with Primo. 13*3^3357 + 2 is a probable prime. There are no other terms <= 6000.

%C No more terms below 50000. - _Amiram Eldar_, Sep 11 2019

%e Primes 41,353,9479,28433 are 13*3^1+2, 13*3^3+2, 13*3^6+2, 13*3^7+2.

%t Select[Range[1000], PrimeQ[13 * 3^# + 2] &] (* _Amiram Eldar_, Sep 11 2019 *)

%o (PARI) for(n=1,6000,if(isprime(13*3^n+2),print1(n,",")))

%K nonn,more

%O 1,2

%A _Rick L. Shepherd_, May 21 2003

%E 11445 (a pseudoprime) from Huseyin Azoguz (huseyin(AT)mmnetz.de), Nov 30 2008

%E a(15)-a(17) from _Amiram Eldar_, Sep 11 2019