OFFSET
0,5
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (22,-190,820,-1849,2038,-840).
FORMULA
E.g.f.: (exp(7*x) - 6*exp(5*x) + 3*exp(4*x) + 14*exp(3*x) - 21*exp(2*x) + 11*exp(x) -2)/3!.
G.f.: -x^3*(5*x+1)*(56*x^2-11*x-1) / ((x-1)*(2*x-1)*(3*x-1)*(4*x-1)*(5*x-1)*(7*x-1)). - Colin Barker, Nov 27 2012
MATHEMATICA
With[{nmax = 50}, CoefficientList[Series[(Exp[7*x] - 6*Exp[5*x] + 3*Exp[4*x] + 14*Exp[3*x] - 21*Exp[2*x] + 11*Exp[x] - 2)/3!, {x, 0, nmax}], x] Range[0, nmax]!] (* G. C. Greubel, Oct 07 2017 *)
LinearRecurrence[{22, -190, 820, -1849, 2038, -840}, {0, 0, 0, 1, 38, 645, 7510}, 30] (* Harvey P. Dale, Sep 20 2022 *)
PROG
(PARI) x='x+O('x^50); concat([0, 0, 0], Vec(-x^3*(5*x+1)*(56*x^2-11*x-1)/( (x-1)*(2*x-1)*(3*x-1)*(4*x-1)*(5*x-1)*(7*x-1)))) \\ G. C. Greubel, Oct 07 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Goran Kilibarda, Vladeta Jovovic, Apr 22 2004
STATUS
approved