OFFSET
1,3
FORMULA
n=0, 1, 2,3, 4, 5, 6,... k=0,-1.-3,0,-16,231,53325,... k=k^2-n^2
MATHEMATICA
lst={}; k=0; Do[k=k^2-n^2; AppendTo[lst, k], {n, 0, 12}]; lst
CROSSREFS
KEYWORD
sign
AUTHOR
Vladimir Joseph Stephan Orlovsky, Aug 31 2008
STATUS
approved