This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A177336 #18 Sep 08 2022 08:45:53 %S A177336 5,7,61,271,1951,3001,6361,11491,11551,14551,18541,19891,21841,31081, %T A177336 32911,32971,33331,33601,42571,42841,50461,53551,58111,68881,70201, %U A177336 74611,79231,80911,93811,96331,98911,104311,109141,114601,121021,125791 %N A177336 Greater of twin primes p such that 3*p-2 is also greater of twin primes. %H A177336 Amiram Eldar, <a href="/A177336/b177336.txt">Table of n, a(n) for n = 1..10000</a> %F A177336 From _Wesley Ivan Hurt_, May 03 2022: (Start) %F A177336 a(n) = A132929(n) + 1. %F A177336 a(n) = A174920(n) + 2. (End) %e A177336 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). %t A177336 Select[Range[3, 126000], And @@ PrimeQ[{#, # - 2, 3# - 2, 3# - 4}] &] (* _Amiram Eldar_, Dec 23 2019 *) %o A177336 (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 %Y A177336 Cf. A006512, A038869, A088878. %Y A177336 Cf. A132929, A174920. %K A177336 nonn %O A177336 1,1 %A A177336 _Juri-Stepan Gerasimov_, May 07 2010 %E A177336 Definition corrected, 1231 and 1483 inserted, and all values above 3000 corrected by _R. J. Mathar_, May 10 2010 %E A177336 Terms corrected to match definition by _D. S. McNeil_, May 10 2010 %E A177336 Name corrected by _Amiram Eldar_, Dec 23 2019