|
|
A072294
|
|
Areas of primitive Heronian triangles sorted by longest side, then by middle side and finally shortest side.
|
|
6
|
|
|
6, 12, 12, 30, 60, 24, 84, 36, 60, 120, 66, 42, 84, 126, 60, 90, 84, 168, 36, 204, 210, 210, 60, 120, 132, 72, 84, 252, 360, 114, 156, 180, 210, 420, 120, 210, 420, 168, 420, 240, 468, 126, 180, 336, 360, 420, 264, 330, 252, 168, 504, 420, 780, 420, 306, 456, 156
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
nn = 200; 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}]; lst (* T. D. Noe, Mar 23 2011 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|