Search: id:A099866 Results 1-1 of 1 results found. %I A099866 %S A099866 1,2,1,3,4,20,5,35,56,504,70,770,3960,1144,1001,45045,80080,1361360, %T A099866 204204,184756,67184,470288,323323,7436429,27457584,228813200,106234700, %U A099866 2868336900,356948592,10351509168,145568097675,45581929575,85801279200 %N A099866 Denominator of sum of all elements M(i,j,k) = i*j/k, (i,j,k = 1..n). a(n) = Denominator[Sum[Sum[Sum[i*j/k,{i,1,n}],{j,1,n}],{k,1,n}]]. %F A099866 a(n) = Denominator[Sum[Sum[Sum[i*j/k, {i, 1, n}], {j, 1, n}], {k, 1, n}]] %F A099866 a(n) = denominator of ((n^2+n)/2)^2*Sum(1/i, i=1..n). - Vladeta Jovovic (vladeta(AT)eunet.rs), Oct 30 2004 %e A099866 Sum[M(i,j,k)] begins 1, 27/2, 66, 625/3, 2055/4, 21609/20, ... So a(2) = 2. %t A099866 Table[ Denominator[ Sum[ i*j/k, {i, n}, {j, n}, {k, n}]], {n, 33}] %Y A099866 Corresponding numerator is A099865 %Y A099866 Cf. A099865. %Y A099866 Sequence in context: A086851 A001054 A141487 this_sequence A085189 A130466 A129322 %Y A099866 Adjacent sequences: A099863 A099864 A099865 this_sequence A099867 A099868 A099869 %K A099866 nonn %O A099866 1,2 %A A099866 Alexander Adamchuk (alex(AT)kolmogorov.com), Oct 28 2004 %E A099866 More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 02 2004 Search completed in 0.001 seconds