OFFSET
1,7
EXAMPLE
a(9)=9^2-3-1=77.
MATHEMATICA
a[n_]:=a[n]=a[n-1]^2-a[n-2]-a[n-3]; a[1]=a[2]=a[3]=1
Transpose[NestList[Flatten[{Rest[#], Last[#]^2-Total[Most[#]]}]&, {1, 1, 1}, 15]][[1]] (* Harvey P. Dale, Apr 28 2012 *)
CROSSREFS
KEYWORD
sign
AUTHOR
Ben Branman, Nov 06 2007, Nov 07 2007
STATUS
approved