%I #22 Sep 08 2022 08:45:02
%S 2,3,139
%N Primes p such that 3^p + 2 is prime.
%C No other terms below 2*10^5.
%C Primes in A051783. - _Jens Kruse Andersen_, Jun 29 2014
%D J.-M. De Koninck, Ces nombres qui nous fascinent, Entry 139, p. 48, Ellipses, Paris 2008.
%e a(2) = 3 because 3^3 + 2 = 29 is prime.
%t For[n = 1, n < 700, n++, If[PrimeQ[3^Prime[n] + 2], Print[Prime[n]]]] (* _Stefan Steinerberger_, Mar 18 2006 *)
%o (Magma) [p: p in PrimesUpTo(2000) | IsPrime(3^p+2)]; // _Vincenzo Librandi_, Jun 30 2014
%Y Cf. A051783, A057739.
%K more,nonn,bref
%O 1,1
%A _G. L. Honaker, Jr._, Oct 29 2000
%E Lower bound for the next term updated by _Max Alekseyev_, Jun 14 2011
|