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 A350736 #10 Jan 18 2022 11:55:32
%S A350736 3,17,137,617,1277,1427,1949,2027,3119,4157,5417,5657,10139,13217,
%T A350736 13691,13709,16187,17657,17837,18911,19379,20507,20807,24371,25577,
%U A350736 27407,27527,29207,31391,31847,32117,32909,33767,34847,36467,39839,40037,47057,47387,47657,48311,49199,49367,49739,49787
%N A350736 Lesser twin primes p such that 4*p is the sum of two consecutive primes.
%H A350736 Robert Israel, <a href="/A350736/b350736.txt">Table of n, a(n) for n = 1..10000</a>
%e A350736 a(3) = 137 is a term because 137 and 139 are primes and 4*137 = 548 is the sum of consecutive primes 271 and 277.
%p A350736 P:= select(isprime,{seq(i,i=3..100000,2)}):
%p A350736 T:= P intersect map(`-`,P,2):
%p A350736 sort(convert(select(r -> prevprime(2*r)+nextprime(2*r)=4*r,T),list));
%t A350736 Select[Plus @@@ Partition[Select[Range[10^5], PrimeQ], 2, 1]/4, And @@ PrimeQ[# + {0, 2}] &] (* _Amiram Eldar_, Jan 13 2022 *)
%Y A350736 Intersection of A001359 and A118134.
%K A350736 nonn
%O A350736 1,1
%A A350736 _J. M. Bergot_ and _Robert Israel_, Jan 12 2022