OFFSET
1,1
MATHEMATICA
a[n_]:=n^3-(3*(n+3))^2; lst={}; Do[AppendTo[lst, a[n]], {n, 0, 5!}]; lst
CROSSREFS
KEYWORD
sign
AUTHOR
Vladimir Joseph Stephan Orlovsky, Dec 22 2008
STATUS
approved