A009004 Ordered short legs of Pythagorean triangles.

3, 5, 6, 7, 8, 9, 9, 10, 11, 12, 12, 13, 14, 15, 15, 15, 16, 16, 17, 18, 18, 19, 20, 20, 20, 21, 21, 21, 22, 23, 24, 24, 24, 24, 25, 25, 26, 27, 27, 27, 28, 28, 28, 29, 30, 30, 30, 31, 32, 32, 32, 33, 33, 33, 33, 34, 35, 35, 35, 36, 36, 36, 36, 36, 37, 38, 39, 39, 39, 39, 40, 40, 40, 40

Offset: 1

Author

David W. Wilson

Keywords

• nonn

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..5000
• Robert Recorde, The Whetstone of Witte, whiche is the seconde parte of Arithmeteke: containing the extraction of rootes; the cossike practise, with the rule of equation; and the workes of Surde Nombers, London, 1557. See p. 57.

Programs

Mathematica

maxLeg = 40; r[a_] := a /. {ToRules[ Reduce[a <= b < c && a^2 + b^2 == c^2, {b, c}, Integers]]}; Flatten[r /@ Complement[ Range[maxLeg], {1, 2, 4}]] (* Jean-François Alcover, Jun 13 2012 *)