OFFSET
0,3
COMMENTS
Partial sums of Chebyshev polynomials S(n,18).
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..750
Index entries for linear recurrences with constant coefficients, signature (19,-19,1).
FORMULA
G.f.: x/(1-19*x+19*x^2-x^3) = x/((1-x)*(1-18*x+x^2)).
a(n+1) = Sum_{k=0..n} S(k, 18), with n>=0, S(k, 18) = U(k, 9) = A049660(k+1).
a(n) = 19*a(n-1) - 19*a(n-2) + a(n-3), n>=3, a(0)=0, a(1)=1, a(2)=19.
a(n) = 18*a(n-1) - a(n-2) + 1, n>=2, a(0)=0, a(1)=1.
a(n+1) = (S(n+1, 18) - S(n, 18) - 1)/16, n>=0.
a(n) = (1/8)*Sum_{k=0..n} Fibonacci(6*k). - Gary Detlefs, Dec 07 2010
MATHEMATICA
LinearRecurrence[{19, -19, 1}, {0, 1, 19}, 50] (* or *) Table[(Fibonacci[ 6*n +3] - 2)/32, {n, 0, 30}] (* G. C. Greubel, Dec 02 2017 *)
PROG
(PARI) a(n)=fibonacci(6*n+3)\32 \\ Charles R Greathouse IV, Oct 07 2016
(Magma) [(Fibonacc9(6*n+3)-2)/32: n in [0..30]]; // G. C. Greubel, Dec 02 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
EXTENSIONS
Chebyshev comments from Wolfdieter Lang, Aug 31 2004
STATUS
approved