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 A307880 #13 Sep 25 2022 16:37:16 %S A307880 13,17,25,37,53,65,73,85,97,109,113,137,149,193,197,205,221,233,277, %T A307880 289,305,317,337,365,401,425,445,449,457,485,505,533,541,613,625,641, %U A307880 653,673,697,709,725,757,785,793,809,821,877,905,925,949,1009 %N A307880 Hypotenuses of primitive pythagorean triangles having the property that the sum and absolute difference of the shorter legs are both prime numbers. %H A307880 Harvey P. Dale, <a href="/A307880/b307880.txt">Table of n, a(n) for n = 1..1000</a> %e A307880 13 is a term because 12 + 5 = 17 and 12 - 5 = 7. %e A307880 17 is a term because 15 + 8 = 23 and 15 - 8 = 7. %e A307880 25 is a term because 24 + 7 = 31 and 24 - 7 = 17. %t A307880 Sqrt[#[[1]]^2+#[[2]]^2]&/@Select[Union[Sort/@({Times@@#,(Last[#]^2-First[ #]^2)/2}&/@(Select[Subsets[Range[1,51,2],{2}],GCD@@#==1&]))],AllTrue[ {Total[#],#[[2]]-#[[1]]},PrimeQ]&]//Union (* _Harvey P. Dale_, Sep 25 2022 *) %Y A307880 Subset of A008846. %K A307880 nonn %O A307880 1,1 %A A307880 _Torlach Rush_, May 02 2019