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 A055594 #8 Jul 30 2017 15:38:06 %S A055594 3,5,5,6,10,5,10,9,4,13,10,9,8,16,15,11,7,12,10,13,13,15,20,12,15,7, %T A055594 14,10,3,17,20,17,20,6,17,18,11,25,8,26,5,20,18,16,32,21,8,15,25,30, %U A055594 19,15,13,12,24,16,17,25,10,15,30,25,22,29,14,24,13,25,15,9,17,18,29,20,35 %N A055594 Shortest side of congruent triangles with integer sides and positive integer area, ordered by longest side, then second longest side and finally shortest side. %H A055594 Ray Chandler, <a href="/A055594/b055594.txt">Table of n, a(n) for n = 1..10000</a> %t A055594 max = 42; triangles = Reap[Do[s = (a+b+c)/2; area = Sqrt[s*(s-a)*(s-b)*(s-c)]; If[IntegerQ[area] && area > 0, Sow[{a, b, c, area}]], {a, 1, max}, {b, a, max}, {c, b, max}]][[2, 1]]; A055594 = Sort[triangles, #1[[3]]*max^2 + #1[[2]]*max + #1[[1]] < #2[[3]]* max^2 + #2[[2]]*max + #2[[1]] &][[All, 1]](* _Jean-François Alcover_, Jun 12 2012 *) %Y A055594 Cf. A055592, A055593, A055595. %K A055594 nonn %O A055594 1,1 %A A055594 _Henry Bottomley_, May 26 2000