A373569 Expansion of x + 1/(-x - 1/(-x - 1/(-x - 1/(-x - 1/(-x + 1))))).

1, 6, 15, 55, 190, 671, 2353, 8272, 29056, 102091, 358671, 1260143, 4427294, 15554592, 54648506, 191998646, 674555937, 2369942427, 8326406594, 29253473175, 102777312308, 361091343583, 1268635610806, 4457144547354, 15659451261015, 55016930950608, 193293024178230

Offset: 0

Author

Peter Luschny, Jun 10 2024

Keywords

• nonn
• easy

Links

• Index entries for linear recurrences with constant coefficients, signature (3,3,-4,-1,1).

Crossrefs

Essentially the same as A006358.

Programs

Mathematica

CoefficientList[Series[x + 1/(-x - 1/(-x - 1/(-x - 1/(-x - 1/(-x + 1))))), {x, 0, 26}], x] (* Michael De Vlieger, Jun 10 2024 *)

Formula

a(n) = [x^n] (x^6 - x^5 - 5*x^4 + 4*x^3 + 6*x^2 - 3*x - 1) / (x^5 - x^4 - 4*x^3 + 3*x^2 + 3*x - 1).