login
Partial sums of A060354.
4

%I #35 Sep 08 2022 08:45:16

%S 0,1,3,9,25,60,126,238,414,675,1045,1551,2223,3094,4200,5580,7276,

%T 9333,11799,14725,18165,22176,26818,32154,38250,45175,53001,61803,

%U 71659,82650,94860,108376,123288,139689,157675,177345,198801,222148,247494

%N Partial sums of A060354.

%C The Ca4 triangle sums of A139600 are given by the terms of this sequence. For the definitions of the Ca4 and other triangle sums see A180662. - _Johannes W. Meijer_, Apr 29 2011

%H Vincenzo Librandi, <a href="/A101357/b101357.txt">Table of n, a(n) for n = 0..10000</a>

%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/PolygonalNumber.html">Polygonal number</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) = Sum_{i=0..n} (i(i-2)^2 + i^2)/2.

%F a(n) = A004255(n), n > 0. - _R. J. Mathar_, Sep 02 2008

%F a(n) = binomial(n+3,4) - 2*binomial(n+2,4) + 4*binomial(n+1,4).

%F a(n) = (n^4 - 2*n^3 + 3*n^2 + 6*n)/8. - _Johannes W. Meijer_, Apr 29 2011

%F G.f.: -x*(4*x^2 - 2*x + 1) / (x-1)^5. - _Colin Barker_, Apr 29 2013

%t Table[Sum[(i*(i - 2)^2 + i^2)/2, {i, 0, n}], {n, 0, 38}]

%t Accumulate[Table[(n (n-2)^2+n^2)/2,{n,0,50}]] (* _Harvey P. Dale_, Aug 05 2011 *)

%o (Magma) [(n^4-2*n^3+3*n^2+6*n)/8: n in [0..40]]; // _Vincenzo Librandi_, Aug 06 2011

%o (PARI) a(n)=(n^4-2*n^3+3*n^2+6*n)/8 \\ _Charles R Greathouse IV_, Oct 16 2015

%Y Cf. A060354, A000332.

%K easy,nonn

%O 0,3

%A _Jonathan Vos Post_, Dec 25 2004

%E More terms from _Joshua Zucker_, May 12 2006

%E Edited by _Stefan Steinerberger_, Aug 01 2007