OFFSET
0,1
COMMENTS
REFERENCES
P. Curtz, Integration numerique des systemes differentiels a conditions initiales, Centre de Calcul Scientifique de l'Armement, Note 12, Arcueil (1969).
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..10000
Index entries for linear recurrences with constant coefficients, signature (5, -10, 10, -5, 1).
FORMULA
First differences: a(n+1)-a(n) = -A141530(n).
Fourth differences: a(n+4)-4*a(n+3)+6*a(n+2)-4*a(n+1)+a(n) = -24 = -A010863(n).
a(0)=9, a(1)=8, a(2)=9, a(3)=0, a(4)=-55, a(n)=5*a(n-1)-10*a(n-2)+ 10*a(n-3)-5*a(n-4)+a(n-5) [From Harvey P. Dale, Jul 13 2011]
G.f.: (9-37*x+59*x^2-55*x^3)/(1-x)^5. - Harvey P. Dale, Jul 13 2011
E.g.f.: (9 - x + x^2 - 2*x^3 - x^4)*exp(x). - G. C. Greubel, Feb 02 2018
MATHEMATICA
LinearRecurrence[{5, -10, 10, -5, 1}, {9, 8, 9, 0, -55}, 40] (* or *) Table[(n+1)(9-9n+5n^2-n^3), {n, 0, 40}] (* or *) CoefficientList[ Series[ (55x^3- 59x^2+ 37x-9)/ (x-1)^5, {x, 0, 40}], x] (* Harvey P. Dale, Jul 13 2011 *)
PROG
(Magma) [(n+1)*(9-9*n+5*n^2-n^3): n in [0..40] ]; // Vincenzo Librandi, Jul 14 2011
(PARI) a(n)=(n+1)*(9-9*n+5*n^2-n^3) \\ Charles R Greathouse IV, Oct 16 2015
CROSSREFS
KEYWORD
sign,easy
AUTHOR
Paul Curtz, Feb 28 2009
EXTENSIONS
Edited, extended by R. J. Mathar, Sep 25 2009
STATUS
approved