|
| |
|
|
A086218
|
|
Primes p such that 3^p-2 is prime.
|
|
2
| | |
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| f[n_]:=3^n-2; lst={}; Do[p=Prime[n]; If[PrimeQ[f[p]], Print[p]; AppendTo[lst, p]], {n, 7!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Jul 17 2009]
|
|
|
CROSSREFS
| Cf. A086214.
Sequence in context: A086832 A111491 A163499 * A202637 A138658 A067464
Adjacent sequences: A086215 A086216 A086217 * A086219 A086220 A086221
|
|
|
KEYWORD
| nonn,hard,more
|
|
|
AUTHOR
| Cino Hilliard (hillcino368(AT)gmail.com), Aug 28 2003
|
|
|
EXTENSIONS
| 2521 from Jorge Coveiro (jorgecoveiro(AT)yahoo.com), Apr 10 2004
|
| |
|
|
