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,1

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.

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 *)

Crossrefs

Sequence in context: A079058 A036496 A196112 * A005527 A285173 A009005

Adjacent sequences: A009001 A009002 A009003 * A009005 A009006 A009007

Keyword

nonn

Author

David W. Wilson

Status

approved