OFFSET
1,1
LINKS
Ray Chandler, Table of n, a(n) for n = 1..10000
César Aguilera, On Pythagorean Triples, hal-02151737 preprint [math.NT], 2019.
MATHEMATICA
lst = {}; Do[ If[ GCD[m, n] == 1, a = 2 m*n; b = m^2 - n^2; c = m^2 + n^2; If[ !PrimeQ@c, AppendTo[lst, c]]], {m, 3, 300}, {n, If[ OddQ@m, 2, 1], m - 1, 2}]; Take[ Union@ lst, 51] (* Robert G. Wilson v, May 02 2009 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Lekraj Beedassy, Jul 19 2006
EXTENSIONS
Term 485, which satisfies 485^2 = 476^2 + 93^2, added by Robert G. Wilson v, May 02 2009
STATUS
approved