login
A162713
Primes of the form 3^p-2^p-2 generated from primes p.
1
3, 17, 328256958598444055417, 127173474823342767533669605649
OFFSET
1,1
COMMENTS
a(5) has 4816 digits.
MATHEMATICA
lst={}; Do[p=Prime[n]; If[PrimeQ[r=3^p - 2^p - 2], AppendTo[lst, r]], {n, 1000}]; lst (* Vincenzo Librandi, Sep 25 2015 *)
PROG
(Magma) [3^p-2^p-2: p in PrimesUpTo(4000) | IsPrime(3^p-2^p-2)]; // Vincenzo Librandi, Sep 25 2015
CROSSREFS
Cf. A162712 (associated p).
Sequence in context: A175984 A051710 A215913 * A161473 A208493 A082056
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Jul 11 2009
EXTENSIONS
Edited by R. J. Mathar, Jul 26 2009
STATUS
approved