OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Index entries for linear recurrences with constant coefficients, signature (1,1,-1).
FORMULA
G.f.: 5*x/((1+x)*(x-1)^2). - Vincenzo Librandi, Sep 15 2013
From G. C. Greubel, May 18 2016: (Start)
a(n) = a(n-1) + a(n-2) - a(n-3).
E.g.f.: (5/2)*(x*cosh(x) + (1+x)*sinh(x)).
MATHEMATICA
RecurrenceTable[{a[1]==5, a[n]==5n-a[n-1]}, a, {n, 70}] (* or *) Flatten[ {#, #}&/@(5Range[40])] (* Harvey P. Dale, Nov 29 2011 *)
CoefficientList[Series[5 / ((1 + x) (x - 1)^2), {x, 0, 60}], x] (* Vincenzo Librandi, Sep 15 2013 *)
LinearRecurrence[{1, 1, -1}, {5, 5, 10}, 50] (* G. C. Greubel, May 18 2016 *)
PROG
(Magma) [n le 1 select (n+4) else 5*n-Self(n-1): n in [1..70] ]; // Vincenzo Librandi, Sep 14 2013
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Oct 18 2009
EXTENSIONS
Corrected a(59) by Harvey P. Dale, Nov 29 2011
STATUS
approved