OFFSET
0,2
LINKS
Harry J. Smith, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (5,-10,10,-5,1).
FORMULA
a(n) = n*(n+1)*(n^2 + n + 4)/4.
a(0)=0, a(1)=3, a(2)=15, a(3)=48, a(4)=120, a(n) = 5a(n-1) - 10a(n-2) + 10a(n-3) - 5a(n-4) + a(n-5).
G.f.: (-3 (x + x^3))/(-1 + x)^5. - Harvey P. Dale, May 03 2011
Sum_{n>=1} 1/a(n) = 5/4 - tanh(sqrt(15)*Pi/2)*Pi/sqrt(15). - Amiram Eldar, Aug 20 2022
E.g.f.: exp(x)*x*(12 + 18*x + 8*x^2 + x^3)/4. - Stefano Spezia, Aug 31 2023
MAPLE
a:=n->sum((n+j^3), j=0..n): seq(a(n), n=0..36); # Zerinvary Lajos, Jul 27 2006
with(combinat):a:=n->sum(fibonacci(4, i), i=0..n): seq(a(n), n=0..36); # Zerinvary Lajos, Mar 20 2008
MATHEMATICA
s=0; lst={}; Do[s+=n^3+n*2; AppendTo[lst, s], {n, 0, 5!}]; lst (* Vladimir Joseph Stephan Orlovsky, Apr 04 2009 *)
Table[n(n+1)(n^2+n+4)/4, {n, 0, 40}] (* or *) LinearRecurrence[ {5, -10, 10, -5, 1}, {0, 3, 15, 48, 120}, 40] (* Harvey P. Dale, May 03 2011 *)
PROG
(PARI) for (n=0, 1000, write("b061316.txt", n, " ", n*(n + 1)*(n^2 + n + 4)/4) ) \\ Harry J. Smith, Jul 21 2009
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Henry Bottomley, Apr 24 2001
STATUS
approved