The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A079140 Numbers n such that (Product of first n twin prime pair averages [A014574]) - 1 is prime. 0
 1, 2, 7, 11, 16, 32, 402, 1107, 1829, 2584, 3124, 6936 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS Some of the larger entries may only correspond to probable primes. LINKS EXAMPLE a(2) = 2 because the product of the first two terms of A014574 - 1, 4 * 6-1 = 23, is prime. MATHEMATICA seq = {1}; prod = 4; k = 1; Do[If[AllTrue[6 n + {-1, 1}, PrimeQ], prod *= 6 n; k++; If[PrimeQ[prod - 1], AppendTo[seq, k]]], {n, 1, 5000}]; seq (* Amiram Eldar, Dec 14 2019 *) PROG (PARI) {atm(N)=local(t, c); t=1; c=0; forprime(p=2, N, if(isprime(p+2), t*=p+1; c++; if(isprime(t-1), print1(c, ", "))))} CROSSREFS Cf. A014574. Sequence in context: A190518 A190750 A049635 * A176897 A166005 A243009 Adjacent sequences:  A079137 A079138 A079139 * A079141 A079142 A079143 KEYWORD nonn,more AUTHOR Jason Earls, Dec 26 2002 EXTENSIONS a(8)-a(12) from Amiram Eldar, Dec 14 2019 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified April 21 11:08 EDT 2021. Contains 343150 sequences. (Running on oeis4.)