OFFSET
0,5
COMMENTS
Floretion Algebra Multiplication Program, FAMP Code: 4kbaseicycsumseq[ + 'i + .5'k + .5k' + .5'ik' + .5'kj'], sumtype: (Y[15], *, vesy)
LINKS
Colin Barker, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (4,-8,17,-27,32,-32,23,-10,2).
FORMULA
a(n) = 4*a(n-1) - 8*a(n-2) + 17*a(n-3) - 27*a(n-4) + 32*a(n-5) - 32*a(n-6) + 23*a(n-7) - 10*a(n-8) + 2*a(n-9) for n>8. - Colin Barker, May 16 2019
PROG
(PARI) concat(0, Vec(x*(1 - 3*x + 5*x^2 - 4*x^3 - 2*x^4 - 2*x^6) / ((1 - x)*(1 + 2*x^2 - 2*x^3 + x^4)*(1 - 3*x + 3*x^2 - 4*x^3 + 2*x^4)) + O(x^40))) \\ Colin Barker, May 16 2019
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Creighton Dement, Sep 05 2005
STATUS
approved