A177336 Greater of twin primes p such that 3*p-2 is also greater of twin primes.

5, 7, 61, 271, 1951, 3001, 6361, 11491, 11551, 14551, 18541, 19891, 21841, 31081, 32911, 32971, 33331, 33601, 42571, 42841, 50461, 53551, 58111, 68881, 70201, 74611, 79231, 80911, 93811, 96331, 98911, 104311, 109141, 114601, 121021, 125791

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Formula

From Wesley Ivan Hurt, May 03 2022: (Start)

a(n) = A132929(n) + 1.

a(n) = A174920(n) + 2. (End)

Example

a(1) = 5 because 5 is the greater of the twin primes (3, 5) and 3*5 - 2 = 13 is the greater of the twin primes (11, 13).

Mathematica

Select[Range[3, 126000], And @@ PrimeQ[{#, # - 2, 3# - 2, 3# - 4}] &] (* Amiram Eldar, Dec 23 2019 *)

Prog

(Magma) [p:p in PrimesInInterval(3, 130000)| IsPrime(p-2) and IsPrime(3*p-2) and IsPrime(3*p-4)]; // Marius A. Burtea, Dec 23 2019

Crossrefs

Cf. A006512, A038869, A088878.

Cf. A132929, A174920.

Sequence in context: A260831 A268433 A201109 * A108200 A077780 A307361

Adjacent sequences: A177333 A177334 A177335 * A177337 A177338 A177339

Keyword

nonn

Author

Juri-Stepan Gerasimov, May 07 2010

Extensions

Definition corrected, 1231 and 1483 inserted, and all values above 3000 corrected by R. J. Mathar, May 10 2010

Terms corrected to match definition by D. S. McNeil, May 10 2010

Name corrected by Amiram Eldar, Dec 23 2019

Status

approved