|
|
A138604
|
|
Short legs of more than two primitive Pythagorean triangles.
|
|
2
|
|
|
60, 84, 105, 120, 132, 140, 156, 165, 168, 180, 195, 204, 220, 228, 231, 240, 252, 255, 260, 264, 273, 276, 280, 285, 300, 308, 312, 315, 336, 340, 345, 348, 357, 360, 364, 372, 380, 385, 396, 399, 408, 420, 429, 435, 440, 444, 455, 456, 460, 465, 468, 476
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
60, 91,109; 60,221,229; 60, 899, 901;
84,187,205; 84, 437, 445; 84,1763,1765;
105,208,233; 105, 608, 617; 105,5512,5513;
120,209,241; 120, 391, 409; 120,3599,3601;
132,475,493; 132,1085,1093; 132,4355,4357;
140,171,221; 140,1221,1229; 140,4899,4901;
156,667,685; 156,1517,1525; 156,6083,6085;
|
|
MATHEMATICA
|
lst = {}; aa = aaa = 1; For[a=1, a<=500, For[b=a+1, ((b+1)^2-b^2)<=a^2, c=(a^2+b^2)^0.5; If[c==Round[c]&&GCD[a, b]==1, If[a == aaa, Print[a]; AppendTo[lst, a]]; aaa=aa; aa=a; ]; b++ ]; a++ ]; Union[lst]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|