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 A179271 #6 Jan 22 2020 13:03:55 %S A179271 2145,3315,3465,4095,4845,5005,5865,6435,6545,6555,7735,8645,9009, %T A179271 9945,10005,10695,11305,11781,13167,13485,13685,13923,14535,15015, %U A179271 15295,15561,16065,16095,17017,17205,17255,17835,17955,18837,19019,19065 %N A179271 Odd long legs `B` of more than one primitive Pythagorean triangle. %C A179271 2145,752,2273;2145,1568,2657;;3315,812,3413;3315,2852,4373; %H A179271 Ray Chandler, <a href="/A179271/b179271.txt">Table of n, a(n) for n = 1..10000</a> %t A179271 lst1={};lst={0};Do[Do[If[GCD[a,b]==1,c=Sqrt[a^2+b^2];If[IntegerQ[c],AppendTo[lst,b];L=Length[lst];If[lst[[L]]==lst[[L-1]]&&OddQ[lst[[L]]],Print[lst[[L]]];AppendTo[lst1,lst[[L]]]]]],{a,b-1,3,-1}],{b,4,4*7!}];lst1 %Y A179271 Cf. A024407, A024408, A024409, A024410, A024411, A161962, A174830 %K A179271 nonn %O A179271 1,1 %A A179271 _Vladimir Joseph Stephan Orlovsky_, Jul 06 2010 %E A179271 a(20) - a(36) _Robert G. Wilson v_, Jul 12 2010