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
From Vincenzo Librandi, Sep 15 2013: (Start)
G.f.: -x*(-5-10*x+5*x^2)/((1+x)*(x-1)^2).
a(n) = a(n-1) + a(n-2) - a(n-3). (End)
E.g.f.: 5*((1+x)*cosh(x) + x*sinh(x) - 1). - G. C. Greubel, May 18 2016
MATHEMATICA
RecurrenceTable[{a[1]==5, a[n]==10n-a[n-1]}, a, {n, 60}] (* or *) CoefficientList[Series[-(- 5 - 10 x + 5 x^2) /((1 + x) (x - 1)^2), {x, 0, 60}], x] (* Vincenzo Librandi, Sep 15 2013 *)
PROG
(Magma) [n le 1 select (n+4) else 10*n-Self(n-1): n in [1..70] ]; // Vincenzo Librandi, Sep 15 2013
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Oct 18 2009
STATUS
approved