OFFSET
1,1
COMMENTS
REFERENCES
Beiler, Albert H.: Recreations In The Theory Of Numbers, Chapter XIV, The Eternal Triangle, Dover Publications Inc., New York, 1964, pp. 104-134.
Sierpinski, W.; Pythagorean Triangles, Dover Publications, Inc., Mineola, New York, 2003.
EXAMPLE
As the first four Pythagorean triples (ordered by increasing A) are (3,4,5), (5,12,13), (6,8,10) and (7,24,25), then a(1)=5, a(2)=13, a(3)=10 and a(4)=25.
MATHEMATICA
PythagoreanTriplets[n_]:=Module[{t={{3, 4, 5}}, i=4, j=5}, While[i<n, h=Sqrt[i^2+j^2]; If[IntegerQ[h] && j<n, AppendTo[t, {i, j, h}]]; If[j<n, j++, i++; j=i+1]]; t]; k=20; data1=PythagoreanTriplets[2k^2+2k+1]; data2=Select[data1, #[[1]]<=2k+1 &]; #[[3]] &/@data2
CROSSREFS
KEYWORD
easy,nice,nonn
AUTHOR
Ant King, Feb 17 2009
STATUS
approved