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 A057098 #5 Nov 21 2019 08:15:41
%S A057098 3,6,5,9,8,12,7,10,15,20,18,9,12,16,21,15,24,14,11,27,20,24,30,16,28,
%T A057098 33,13,40,25,36,21,18,33,24,32,39,42,30,15,48,20,45,36,48,40,35,28,39,
%U A057098 51,22,60,54,17,27,40,57,36,48,65,60,24,32,35,56,63,45,60,19,66,44,56
%N A057098 Shortest side of a Pythagorean triangle (ordered by the product of the sides).
%F A057098 a(n) =A057096(n)/(A057099(n)*A057100(n)) =sqrt(A057100(n)^2-A057099(n)^2)
%e A057098 a(1)=3 since 3*4*5=60 is smallest possible positive product
%t A057098 maxShortLeg = 66; terms = 71;
%t A057098 r[a_] := {a, b, c} /. {ToRules[Reduce[a <= b < c && a^2+b^2 == c^2, {b, c}, Integers]]};
%t A057098 abc = r /@ Complement[Range[maxShortLeg], {1, 2, 4}] // Flatten[#, 1]&;
%t A057098 SortBy[abc, Times @@ # &][[;; terms, 1]] (* _Jean-François Alcover_, Nov 21 2019 *)
%Y A057098 Cf. A009004, A009005, A046083, A057096.
%K A057098 nonn
%O A057098 1,1
%A A057098 _Henry Bottomley_, Aug 01 2000