|
|
A061000
|
|
a(n) = Sum_{k=1..n} A060999(k) * k^3.
|
|
0
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Original name: x.v where x = first n terms of A060999, v = [1,8,27,...,n^3].
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
a(3) = 0*1 + 1*8 + 3*27 = 89.
|
|
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 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|