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 A083875 #8 Nov 03 2019 17:55:04
%S A083875 1,2,4,5,6,7,10,11,12,14,15,19,20,21,22,26,28,30,33,34,35,36,39,40,42,
%T A083875 44,45,48,50,51,55,56,60,65,66,68,70,76,77,78,80,84,85,87,88,91,95,
%U A083875 104,105,110,114,115,119,120,124,126,130,132,133,140,144,146
%N A083875 One-sixth the areas of primitive Heronian triangles sorted.
%C A083875 The Mathematica program examines all primitive Heronian triangles having longest side <= 900, which guarantees that we have found all triangles with area/6 <= 150. - _T. D. Noe_, Jun 22 2004
%H A083875 Giovanni Resta, <a href="/A083875/b083875.txt">Table of n, a(n) for n = 1..10000</a>
%t A083875 nn=900; lst={}; Do[s=(a+b+c)/2; If[IntegerQ[s] && GCD[a, b, c]==1, area2=s(s-a)(s-b)(s-c); If[area2>0 && IntegerQ[Sqrt[area2]], AppendTo[lst, Sqrt[area2]]]], {a, nn}, {b, a}, {c, b}]; Union[Select[lst, #<nn&]]/6
%Y A083875 Cf. A072294.
%K A083875 nonn
%O A083875 1,2
%A A083875 _Lekraj Beedassy_, Jun 18 2003
%E A083875 More terms from _T. D. Noe_, Jun 22 2004