login
a(n) = n*(n-1)*(n+1)*(3*n-2)/12.
5

%I #50 Aug 23 2022 09:50:32

%S 0,2,14,50,130,280,532,924,1500,2310,3410,4862,6734,9100,12040,15640,

%T 19992,25194,31350,38570,46970,56672,67804,80500,94900,111150,129402,

%U 149814,172550,197780,225680,256432,290224,327250,367710,411810,459762

%N a(n) = n*(n-1)*(n+1)*(3*n-2)/12.

%C Partial sums of A011379.

%C Antidiagonal sums of the convolution array A213819. - _Clark Kimberling_, Jul 04 2012

%H Vincenzo Librandi, <a href="/A153978/b153978.txt">Table of n, a(n) for n = 1..1000</a>

%H <a href="/index/Rec#order_05">Index entries for linear recurrences with constant coefficients</a>, signature (5,-10,10,-5,1).

%F a(n) = 2 * A001296(n-1) = (n-1)*n*(n+1)*(3*n-2)/12 (n>0). - _Bruno Berselli_, Apr 21 2010

%F a(n) = Sum_{i=1..n-1} binomial(i+1,i)*i^2. - _Enrique PĂ©rez Herrero_, Jun 28 2014

%F G.f.: 2*x^2*(2*x+1) / (1 - x)^5. - _Colin Barker_, Jun 28 2014

%F a(n) = 5*a(n-1) - 10*a(n-2) + 10*a(n-3) - 5*a(n-4) + a(n-5) for n > 4. - _Vincenzo Librandi_, Jun 30 2014

%F a(n) = Sum_{k=1..n-1}k*((n-1)*n/2 + k) for n > 1. - _J. M. Bergot_, Feb 16 2018

%F From _Amiram Eldar_, Aug 23 2022: (Start)

%F Sum_{n>=2} 1/a(n) = 141/5 - 9*sqrt(3)*Pi/5 - 81*log(3)/5.

%F Sum_{n>=2} (-1)^n/a(n) = 18*sqrt(3)*Pi/5 + 48*log(2)/5 - 129/5. (End)

%t a[n_]:=n^2;b[n_]:=n^3;c[n_]:=b[n]+a[n];lst={};s=0;Do[AppendTo[lst,s+=c[n]],{n,0,6!}];lst

%t With[{r=Range[0,50]},Accumulate[r^2+r^3]] (* _Harvey P. Dale_, Jan 16 2011 *)

%t Rest[CoefficientList[Series[-2 x^2 * (2 x + 1)/(x - 1)^5, {x, 0, 40}], x] (* _Vincenzo Librandi_, Jun 30 2014 *)

%t LinearRecurrence[{5,-10,10,-5,1}, {0,2,14,50,130}, 25] (* _G. C. Greubel_, Sep 01 2016 *)

%o (PARI) concat(0, Vec(-2*x^2*(2*x+1)/(x-1)^5 + O(x^100))) \\ _Colin Barker_, Jun 28 2014

%o (PARI) a(n) = n*(n-1)*(n+1)*(3*n-2)/12 \\ _Charles R Greathouse IV_, Sep 01 2016

%Y Cf. A003215, A000537, A000578, A005898, A027602, A006007, A153976, A153977, A011379, A052149, A213819.

%K nonn,easy

%O 1,2

%A _Vladimir Joseph Stephan Orlovsky_, Jan 03 2009

%E Edited by _Bruno Berselli_, Jun 15 2010

%E Simpler definition as suggested by _Wesley Ivan Hurt_, Jun 29 2014