|
|
A120287
|
|
Numerator of 1/n^3 + 2/(n-1)^3 + 3/(n-2)^3 +...+ (n-1)/2^3 + n.
|
|
0
|
|
|
1, 17, 355, 7715, 203413, 492527, 49601051, 1823359051, 16684019407, 186004308017, 22757931053507, 298630937704541, 50872538998767329, 51223731720255509, 103063783892301061, 7045407930432340853
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
p divides a(p-1) and a(p-2) for prime p>3.
|
|
LINKS
|
|
|
FORMULA
|
a(n) = numerator[Sum[Sum[1/i^3,{i,1,k}],{k,1,n}]].
|
|
MATHEMATICA
|
Numerator[Table[Sum[Sum[1/i^3, {i, 1, k}], {k, 1, n}], {n, 1, 25}]]
|
|
CROSSREFS
|
|
|
KEYWORD
|
frac,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|