|
|
A111121
|
|
a(n) = a(n-3)^3 + a(n-2)^2 + a(n-1); a(1) = -1, a(2) = 0, a(3) = 1.
|
|
1
|
|
|
-1, 0, 1, 0, 1, 2, 3, 8, 25, 116, 1253, 30334, 3161239, 2890534072, 37908199848897, 39946852159641845000, 25587984997105954864555102857, 56071032677809871004962669691748664133130
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,6
|
|
LINKS
|
|
|
EXAMPLE
|
a(5) = a(2)^3 + a(3)^2 + a(4) = 0^3 + 1^2 + 0 = 1.
a(9) = a(6)^3 + a(7)^2 + a(7) = 2^3 + 3^2 + 8 = 8 + 9 + 8 = 25.
|
|
MATHEMATICA
|
a[1] = -1; a[2] = 0; a[3] = 1; a[n_] := a[n] = a[n - 3]^3 + a[n - 2]^2 + a[n - 1]; a /@ Range[20]
nxt[{a_, b_, c_}]:={b, c, a^3+b^2+c}; NestList[nxt, {-1, 0, 1}, 20][[All, 1]] (* Harvey P. Dale, Nov 14 2022 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Hamilton L. Hardison (HamiltonHardison(AT)gmail.com), Oct 15 2005
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|