A155119 a(n) = 5*a(n-1) + 5*a(n-2), n > 2, a(0)=1, a(1)=4, a(2)=24.

1, 4, 24, 140, 820, 4800, 28100, 164500, 963000, 5637500, 33002500, 193200000, 1131012500, 6621062500, 38760375000, 226907187500, 1328337812500, 7776225000000, 45522814062500, 266495195312500, 1560090046875000, 9132926210937500

Offset

0,2

Links

G. C. Greubel, Table of n, a(n) for n = 0..1000

Index entries for linear recurrences with constant coefficients, signature (5,5).

Formula

G.f.: (1 - x - x^2) / (1 - 5*x - 5*x^2).

a(n) = (1/5)*[n=0] - 4*(sqrt(5)*i)^(n-2)*ChebyshevU(n, -sqrt(5)*i/2). - G. C. Greubel, Mar 25 2021

E.g.f.: (3 + 4*exp(5*x/2)*(3*cosh(3*sqrt(5)*x/2) + sqrt(5)*sinh(3*sqrt(5)*x/2)))/15. - Stefano Spezia, May 31 2023

Mathematica

With[{m=5}, LinearRecurrence[{m, m}, {1, m-1, m^2-1}, 30]] (* G. C. Greubel, Mar 25 2021 *)

Prog

(Magma) m:=5; [1] cat [n le 2 select (m-1)*(m*n-(m-1)) else m*(Self(n-1) + Self(n-2)): n in [1..30]]; // G. C. Greubel, Mar 25 2021
(Sage) m=5; [1]+[-(m-1)*(sqrt(m)*i)^(n-2)*chebyshev_U(n, -sqrt(m)*i/2) for n in (1..30)] # G. C. Greubel, Mar 25 2021

Crossrefs

Sequences of the form a(n) = m*(a(n-1) + a(n-2)) with a(0)=1, a(1) = m-1, a(2) = m^2 -1: A155020 (m=2), A155116 (m=3), A155117 (m=4), this sequence (m=5), A155127 (m=6), A155130 (m=7), A155132 (m=8), A155144 (m=9), A155157 (m=10).

Sequence in context: A262376 A204199 A005319 * A370234 A114169 A121102

Adjacent sequences: A155116 A155117 A155118 * A155120 A155121 A155122

Keyword

nonn,easy

Author

Philippe Deléham, Jan 20 2009

Extensions

a(20) corrected and a(21) from Sean A. Irvine, May 19 2019

Status

approved