OFFSET
0,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (10,-32,38,-15).
FORMULA
G.f.: 2*(1-7*x+17*x^2-19*x^3)/((1-5*x)*(1-3*x)*(1-x)^2). - Vincenzo Librandi, Feb 26 2013
MATHEMATICA
Table[3^n + 5^n - 2 n, {n, 0, 30}] (* or *) CoefficientList[Series[2 (1 - 7 x + 17 x^2 - 19 x^3)/((1 - 5 x) (1 - 3 x) (1 - x)^2), {x, 0, 30}], x] (* Vincenzo Librandi, Feb 26 2013 *)
LinearRecurrence[{10, -32, 38, -15}, {2, 6, 30, 146}, 30] (* Harvey P. Dale, Apr 27 2016 *)
PROG
(Magma) [3^n+5^n-2*n: n in [0..30]]; // Vincenzo Librandi, Feb 27 2013
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Mohammad K. Azarian, Aug 19 2006
EXTENSIONS
Edited by Ray Chandler, Sep 06 2006
STATUS
approved