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 A177433 #11 Feb 13 2019 03:59:28
%S A177433 3,5,7,5,11,17,19,13,71,107,109,73,179,269,271,181,347,521,523,349,
%T A177433 1427,2141,2143,1429,2111,3167,3169,2113,3767,5651,5653,3769,5879,
%U A177433 8819,8821,5881,10091,15137,15139,10093,10427,15641,15643,10429,11351,17027,17029
%N A177433 List of 4-tuples of twin primes q, p, p+2 and q+2 such that 3*q < 2*p < 2*(p+2) < 3*(q+2).
%e A177433 a(1)=3, a(2)=5, a(3)=7 and a(4)=5 because 3*3 < 2*5 < 2*(5+2) < 3*(3+2), i.e., 9 < 10 < 14 < 15.
%p A177433 A001359 := proc(n) option remember; if n = 1 then 3; else for a from procname(n-1)+2 by 2 do if isprime(a) and isprime(a+2) then return a; end if; end do: end if; end proc:
%p A177433 isA001359 := proc(n) isprime(n) and isprime(n+2) ; end proc:
%p A177433 for n from 1 to 400 do q := A001359(n) ; for twop from 3*q+1 to 3*q+2 by 2 do p := twop/2 ; if isA001359(p) and twop+2 < 3*q+6 then printf("%d,%d,%d,%d,",q,p,p+2,q+2) ; end if; end do: end do: # _R. J. Mathar_, May 10 2010
%Y A177433 Cf. A176821, A177335.
%K A177433 nonn,tabf
%O A177433 1,1
%A A177433 _Juri-Stepan Gerasimov_, May 08 2010
%E A177433 More terms from _R. J. Mathar_ and _D. S. McNeil_, May 10 2010