A061000 a(n) = Sum_{k=1..n} A060999(k) * k^3.
0, 8, 89, 537, 2287, 7471, 20505, 49689, 108738, 219738, 416726, 748502, 1284570, 2121490, 3387115, 5250795, 7933293, 11712429, 16938987, 24050987, 33580556, 46177140, 62626924, 83860588, 110985588, 145311516, 188358237, 241899165
Offset: 1
Keywords
Examples
a(3) = 0*1 + 1*8 + 3*27 = 89.
Programs
-
Mathematica
nn=30;With[{c=Range[nn]^3,d=Table[Floor[(n+1)^3/9+1/2],{n,0,nn-1}]},Table[Take[c,n].Take[d,n],{n,nn}]] (* Harvey P. Dale, Jan 20 2013 *)
Comments