OFFSET
1,1
COMMENTS
{17, 144, 145}, {145, 10512, 10513}, {10513, 55261584, 55261585}, ... are sides {a < b < c} of the right triangles, with hypotenuse c = b + 1.
LINKS
Eric Chen, Table of n, a(n) for n = 1..21
MATHEMATICA
nxt[{n_, a_}]:={n+1, If[OddQ[n], (a^2-1)/2, a+1]}; NestList[nxt, {1, 17}, 20][[All, 2]] (* Harvey P. Dale, Mar 27 2021 *)
PROG
(PARI) a(n) = if(n==1, 17, if(n%2, a(n-1)+1, (a(n-1)^2 - 1)/2)) \\ Eric Chen, Jun 09 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Benjamin Knight, May 08 2018
STATUS
approved