login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Primes of the form 3^p-2^p-2 generated from primes p.
1

%I #22 Dec 03 2024 16:59:45

%S 3,17,328256958598444055417,127173474823342767533669605649

%N Primes of the form 3^p-2^p-2 generated from primes p.

%C a(5) has 4816 digits.

%t lst={}; Do[p=Prime[n]; If[PrimeQ[r=3^p - 2^p - 2], AppendTo[lst, r]], {n, 1000}]; lst (* _Vincenzo Librandi_, Sep 25 2015 *)

%t Select[3^#-2^#-2&/@Prime[Range[50]],PrimeQ] (* _Harvey P. Dale_, Dec 03 2024 *)

%o (Magma) [3^p-2^p-2: p in PrimesUpTo(4000) | IsPrime(3^p-2^p-2)]; // _Vincenzo Librandi_, Sep 25 2015

%Y Cf. A162712 (associated p).

%K nonn

%O 1,1

%A _Vincenzo Librandi_, Jul 11 2009

%E Edited by _R. J. Mathar_, Jul 26 2009