OFFSET
0,4
COMMENTS
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..1000
Eric Weisstein's World of Mathematics, Johnson Graph
Index entries for linear recurrences with constant coefficients, signature (5,8,-12).
FORMULA
a(n) = (3 * 6^n + 5*(-2)^n - 8)/120.
a(0)=0, a(1)=0, a(2)=1, a(n) = 5*a(n-1) + 8*a(n-2) - 12*a(n-3). - Harvey P. Dale, Apr 02 2015
E.g.f.: (3*exp(6*x) + 5*exp(-2*x) - 8*exp(x))/120. - G. C. Greubel, Dec 27 2019
MAPLE
seq( (3*6^n +5*(-2)^n -8)/120, n=0..40); # G. C. Greubel, Dec 27 2019
MATHEMATICA
CoefficientList[Series[x^2/((1-x)(1+2x)(1-6x)), {x, 0, 40}], x] (* or *) LinearRecurrence[{5, 8, -12}, {0, 0, 1}, 40] (* Harvey P. Dale, Apr 02 2015 *)
PROG
(PARI) vector(41, n, (3*6^(n-1) + 5*(-2)^(n-1) - 8)/120) \\ G. C. Greubel, Dec 27 2019
(Magma) [(3*6^n +5*(-2)^n -8)/120: n in [0..40]]; // G. C. Greubel, Dec 27 2019
(Sage) [(3*6^n +5*(-2)^n -8)/120 for n in (0..40)] # G. C. Greubel, Dec 27 2019
(GAP) List([0..40], n-> (3*6^n +5*(-2)^n -8)/120); # G. C. Greubel, Dec 27 2019
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Paul Barry, Dec 17 2003
STATUS
approved