OFFSET
1,1
COMMENTS
This is also the list of a, where a is positive integer solutions of 1/a+1/b=1/c and a>b>c and gcd[a,b,c]=1, sorted by ascending a, then b. See A247372 for list of b, A246429 for list of c. - Albert Lau, Sep 19 2014
LINKS
Albert Lau, Table of n, a(n) for n = 1..10539
FORMULA
Values r*s, where r<s<2r and (r, s)=1.
The other 2 sides are s^2 and r^2-s^2. - Albert Lau, Sep 19 2014
MATHEMATICA
aMax = 300;
Select[Sequence @@@ Table[{m (m + n), n (m + n), m n}, {m, Sqrt[aMax]}, {n, Min[m - 1, aMax/m - m]}], GCD @@ # == 1 &] // Sort;
%[[;; , 1]]
(* Albert Lau, Sep 19 2014 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Lekraj Beedassy and Ray Chandler, May 09 2005
STATUS
approved