OFFSET
1,1
COMMENTS
{3, 4, 5}, {5, 12, 13}, {13, 84, 85}... are sides {a<b<c} of the right triangles, with hypotenuse c=b+1.
MATHEMATICA
Transpose[NestList[{#[[1]]+1, If[EvenQ[#[[1]]+1], (#[[2]]^2-1)/2, #[[2]]+1]}&, {1, 3}, 20]][[2]] (* Harvey P. Dale, May 02 2012 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Zak Seidov, Oct 21 2002
EXTENSIONS
More terms from Harvey P. Dale, May 02 2012
STATUS
approved