OFFSET
0,2
LINKS
Colin Barker, Table of n, a(n) for n = 0..1000
D. Fortin, B-spline Toeplitz Inverse Under Corner Perturbations, International Journal of Pure and Applied Mathematics, Volume 77, No. 1, 2012, 107-118. - From N. J. A. Sloane, Oct 22 2012
Index entries for linear recurrences with constant coefficients, signature (11,-11,1).
FORMULA
a(n) = Sum_{k=0..n} S(k, 10) with S(k, 10) = U(k, 5) = A004189(k+1) Chebyshev's polynomials of the second kind.
G.f.: 1/((1-x)*(1 - 10*x + x^2)) = 1/(1 - 11*x + 11*x^2 - x^3).
a(n) = 11*a(n-1) - 11*a(n-2) + a(n-3) with n >= 2, a(-1)=0, a(0)=1, a(1)=11.
a(n) = 10*a(n-1) - a(n-2) + 1 with n >= 1, a(-1)=0, a(0)=1.
a(n) = (S(n+1, 10) - S(n, 10) - 1)/8.
a(n) = (-6 + (27-11*sqrt(6))*(5 - 2*sqrt(6))^n + (5 + 2*sqrt(6))^n*(27 + 11*sqrt(6)))/48. - Colin Barker, Mar 05 2016
MATHEMATICA
LinearRecurrence[{11, -11, 1}, {1, 11, 110}, 30] (* G. C. Greubel, May 24 2019 *)
CoefficientList[Series[1/(1-11x+11x^2-x^3), {x, 0, 30}], x] (* Harvey P. Dale, Aug 24 2021 *)
PROG
(PARI) Vec(1/((1-x)*(1-10*x+x^2)) + O(x^30)) \\ Colin Barker, Jun 14 2015
(Magma) I:=[1, 11, 110]; [n le 3 select I[n] else 11*Self(n-1)-11*Self(n-2) +Self(n-3): n in [1..30]]; // G. C. Greubel, May 24 2019
(Sage) (1/((1-x)*(1 - 10*x + x^2))).series(x, 30).coefficients(x, sparse=False) # G. C. Greubel, May 24 2019
(GAP) a:=[1, 11, 110];; for n in [4..30] do a[n]:=11*a[n-1]-11*a[n-2]+ a[n-3]; od; a; # G. C. Greubel, May 24 2019
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Wolfdieter Lang, Aug 31 2004
STATUS
approved