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 A174917 #6 Dec 18 2021 19:07:32
%S A174917 5,11,29,41,107,137,149,197,239,347,431,461,569,599,659,809,821,1019,
%T A174917 1229,1289,1481,1619,1787,1877,1931,2027,2129,2141,2309,2339,2657,
%U A174917 2687,2801,2969,3119,3329,3467,3557,3581,4001,4019,4127,4241,4421,4547,4649
%N A174917 Lesser of twin primes p1 such that p2+(p2^2-p1^2) is a prime number.
%C A174917 5+(7^2-5^2)=5+24=29,...
%H A174917 Harvey P. Dale, <a href="/A174917/b174917.txt">Table of n, a(n) for n = 1..1000</a>
%t A174917 lst={};Do[p1=Prime[n];p2=p1+2;If[PrimeQ[p2]&&PrimeQ[p2+(p2^2-p1^2)],AppendTo[lst,p1]],{n,4*6!}];lst
%t A174917 Select[Partition[Prime[Range[700]],2,1],#[[2]]-#[[1]]==2&& PrimeQ[ #[[2]]+ #[[2]]^2-#[[1]]^2]&][[All,1]] (* _Harvey P. Dale_, Dec 18 2021 *)
%Y A174917 Cf. A001359, A174913, A174915, A174916
%K A174917 nonn
%O A174917 1,1
%A A174917 _Vladimir Joseph Stephan Orlovsky_, Apr 02 2010