%I A099865
%S A099865 1,27,66,625,2055,21609,10164,123282,320805,4465505,920821,14537549,
%T A099865 104285363,41010655,47830280,2816662204,6447760119,139131611847,
%U A099865 26153100905,29313445875,13068630729,111103313343,91973556693
%N A099865 Numerator of sum of all elements M(i,j,k) = i*j/k, (i,j,k = 1..n). a(n)
= Numerator[Sum[Sum[Sum[i*j/k,{i,1,n}],{j,1,n}],{k,1,n}]].
%F A099865 a(n) = Numerator[Sum[Sum[Sum[i*j/k, {i, 1, n}], {j, 1, n}], {k, 1, n}]]
%e A099865 Sum[M(i,j,k)] begins 1, 27/32, 66, 625/3, 2055/4, 21609/20, ... So a(4)
= 625.
%t A099865 Table[ Numerator[ Sum[ i*j/k, {i, n}, {j, n}, {k, n}]], {n, 23}]
%Y A099865 Corresponding denominator of Sum[M(i, j, k)] is A099866
%Y A099865 Cf. A099866.
%Y A099865 Sequence in context: A088248 A078111 A106200 this_sequence A065008 A116353
A116302
%Y A099865 Adjacent sequences: A099862 A099863 A099864 this_sequence A099866 A099867
A099868
%K A099865 nonn,frac
%O A099865 1,2
%A A099865 Alexander Adamchuk (alex(AT)kolmogorov.com), Oct 28 2004
|