OFFSET
1,1
COMMENTS
Solution to (b-1)*b = (c^2+2bc+c)/2.
EXAMPLE
MATHEMATICA
lst={}; k=1; j=0; Do[b=14*k-j-2; AppendTo[lst, (b-1)*b]; j=k; k=b, {n, 1, 16}]; lst
CROSSREFS
KEYWORD
nonn
AUTHOR
Manuel Valdivia, May 05 2010
STATUS
approved