This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A093885 #19 Mar 28 2025 04:26:11 %S A093885 0,0,5,60,876,15820,342490,8659697,250596841,8170355939,296392500231, %T A093885 11842341000706,516766134975841,24454542316972336,1247414741568401188, %U A093885 68231675778495540368,3983959314088980184276,247324089280835008754847 %N A093885 a(n) = floor( {product of all possible sums of (n-1) numbers chosen from among first n numbers} / {sum of all possible products of (n-1) numbers chosen from among first n numbers} ). %C A093885 The denominator is given by A000254(n). %D A093885 Amarnath Murthy, Another combinatorial approach towards generalizing the AM-GM inequality, Octogon Mathematical Magazine Vol. 8, No. 2, October 2000. %D A093885 Amarnath Murthy, Smarandache Dual Symmetric Functions And Corresponding Numbers Of The Type Of Stirling Numbers Of The First Kind. Smarandache Notions Journal Vol. 11, No. 1-2-3 Spring 2000. %e A093885 a(1) = 1, a(2) = floor((1*2)/(1+2)) = 1, a(3) = floor((1+2)*(1+3)*(2+3)/(1*2+1*3+2*3)) = floor(60/11) = 5. %t A093885 Do[l = Select[Subsets[Range[n]], Length[ # ]==n-1&]; a = Times @@ Map[Plus @@ #&, l]; b = Plus @@ Map[Times @@ #&, l]; Print[Floor[a/b]], {n, 1, 20}] (* _Ryan Propper_, Sep 28 2006 *) %Y A093885 Cf. A093883, A093884, A000254. %K A093885 nonn %O A093885 1,3 %A A093885 _Amarnath Murthy_, Apr 22 2004 %E A093885 More terms from _Ryan Propper_, Sep 28 2006