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 (3,-1,-3,2).
FORMULA
G.f.: (1-x+4*x^2)/((1+x)*(1-x)^2*(1-2*x)).
a(n) = (2^(n+3) + (-1)^n - (4*n+7))/2.
a(n) = 3*a(n-1) - a(n-2) - 3*a(n-3) + 2*a(n-4).
E.g.f.: (8*exp(2*x) + exp(-x) - (4*x+7)*exp(x))/2. - G. C. Greubel, Jun 04 2019
MATHEMATICA
LinearRecurrence[{3, -1, -3, 2}, {1, 2, 9, 22}, 40] (* G. C. Greubel, May 24 2016 *)
PROG
(PARI) my(x='x+O('x^40)); Vec((1-x+4*x^2)/((1+x)*(1-x)^2*(1-2*x))) \\ G. C. Greubel, Oct 10 2017
(Magma) [(2^(n+3) +(-1)^n -(4*n+7))/2: n in [0..40]]; // G. C. Greubel, Oct 10 2017
(Sage) [(2^(n+3) + (-1)^n - (4*n+7))/2 for n in (0..40)] # G. C. Greubel, Jun 04 2019
(GAP) List([0..40], n-> (2^(n+3) + (-1)^n - (4*n+7))/2) # G. C. Greubel, Jun 04 2019
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Paul Barry, Oct 21 2009
STATUS
approved