A089919 Numbers k such that 3^prime(k) - 2 is prime.

1, 3, 12, 13, 66, 100, 369

Offset

1,2

Comments

No additional terms up to n=1000. - Harvey P. Dale, Oct 10 2016

a(8) > 91500, if it exists (based on the data at A014224). - Amiram Eldar, Jul 07 2024

Links

Table of n, a(n) for n=1..7.

Formula

a(n) = A000720(A086218(n)). - Amiram Eldar, Jul 07 2024

Mathematica

Select[Range[370], PrimeQ[3^Prime[#]-2]&] (* Harvey P. Dale, Oct 10 2016 *)

Prog

(PARI) f(n) = for(x=1, n, if(ispseudoprime(3^prime(x)-2), print1(x, ", ")))

Crossrefs

Cf. A000720, A014224, A086218.

Sequence in context: A353439 A117061 A341799 * A222711 A176796 A242130

Adjacent sequences: A089916 A089917 A089918 * A089920 A089921 A089922

Keyword

nonn,more

Author

Cino Hilliard, Jan 11 2004

Extensions

Definition corrected by Jorge Coveiro, Jan 31 2006, Jul 25 2006

Status

approved