A262088 a(0)=0, a(1)=1, a(n) = -a(n-2)^2 - a(n-1)^3.

0, 1, -1, 0, -1, 1, -2, 7, -347, 41781874, -72939661777729919216033, 388053169934428398618745564559557538054223536478283729487028027756061

Offset: 0

Author

Andrew R. Reiter, Sep 10 2015

Keywords

• sign

Comments

Homogeneous cubic recurrence relation of order 2 with -1 coefficients.

Next term is too large to be included.

Crossrefs

Cf. A262089.

Programs

Maple

f:=proc(n) local i; option remember; if n=0 then 0
elif n=1 then 1
else -f(n-2)^2-f(n-1)^3; fi; end;
[seq(f(n),n=0..10)]; # N. J. A. Sloane, Jun 16 2021

Mathematica

RecurrenceTable[{a[n] == -a[n - 2]^2 - a[n - 1]^3, a[0] == 0, a[1] == 1}, a, {n, 1, 11}] (* Michael De Vlieger, Sep 11 2015 *)

Extensions

Data and offset corrected by N. J. A. Sloane, Jun 16 2021