OFFSET
0,3
COMMENTS
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (5,-2,-8).
FORMULA
MAPLE
seriestolist(series((1-5*x+5*x^2)/((4*x-1)*(2*x-1)*(x+1)), x=0, 25)); -or- Floretion Algebra Multiplication Program, FAMP Code: 2tessumseq[(.5'i - .5'k - .5i' + .5k' - .5'ij' - .5'ji' - .5'jk' - .5'kj')('i + j' + 'ij' + 'ji')] Sumtype is set to:sum[Y[15]] = sum(*) (from 3rd term, disregarding signs)
MATHEMATICA
LinearRecurrence[{5, -2, -8}, {1, 0, 3}, 50] (* G. C. Greubel, Sep 01 2017 *)
PROG
(PARI) x='x+O('x^50); Vec((1-5*x+5*x^2)/((4*x-1)*(2*x-1)*(x+1))) \\ G. C. Greubel, Sep 01 2017
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Creighton Dement, Jul 31 2005
STATUS
approved