A110141 Triangle, read by rows, where row n lists the denominators of unit fraction coefficients of the products of {c_k}, in ascending order by indices of {c_k}, in the coefficient of x^n in exp(Sum_{k>=1} c_k/k*x^k).
1, 1, 2, 2, 6, 2, 3, 24, 4, 3, 8, 4, 120, 12, 6, 8, 4, 6, 5, 720, 48, 18, 16, 8, 6, 5, 48, 8, 18, 6, 5040, 240, 72, 48, 24, 12, 10, 48, 8, 18, 6, 24, 10, 12, 7, 40320, 1440, 360, 192, 96, 36, 30, 96, 16, 36, 12, 24, 10, 12, 7, 384, 32, 36, 12, 15, 32, 8, 362880, 10080, 2160, 960
Offset: 0
Examples
Coefficients [x^n] exp(c1*x + (c2/2)*x^2 + (c3/3)*x^3 + ...) begin: [x^0]: 1; [x^1]: 1*c1; [x^2]: (1/2)*c1^2 + (1/2)*c2; [x^3]: (1/6)*c1^3 + (1/2)*c1*c2 + (1/3)*c3; [x^4]: (1/24)*c1^4 + (1/4)*c1^2*c2 + (1/3)*c1*c3 + (1/8)*c2^2 + (1/4)*c4; [x^5]: (1/120)*c1^5 + (1/12)*c1^3*c2 + (1/6)*c1^2*c3 + (1/8)*c1*c2^2 + (1/4)*c1*c4 + (1/6)*c2*c3 + (1/5)*c5; [x^6]: (1/720)*c1^6 + (1/48)*c1^4*c2 + (1/18)*c1^3*c3 + (1/16)*c1^2*c2^2 + (1/8)*c1^2*c4 + (1/6)*c1*c2*c3 + (1/5)*c1*c5 + (1/48)*c2^3 + (1/8)*c2*c4 + (1/18)*c3^2 + (1/6)*c6; forming this triangle of unit fraction coefficients: 1; 1; 2,2; 6,2,3; 24,4,3,8,4; 120,12,6,8,4,6,5; 720,48,18,16,8,6,5,48,8,18,6; 5040,240,72,48,24,12,10,48,8,18,6,24,10,12,7; 40320,1440,360,192,96,36,30,96,16,36,12,24,10,12,7,384,32,36,12,15,32,8; 362880,10080,2160,960,480,144,120,288,48,108,36,48,20,24,14,384,32,36,12,15,32,8,144,40,24,14,162,18,20,9; ...
References
- Macdonald, I. G. Symmetric functions and Hall polynomials. Oxford University Press, 1995. [From Vladimir Dotsenko, Apr 19 2009]
Crossrefs
Programs
-
Mathematica
Table[n!/CoefficientRules[n! CycleIndex[SymmetricGroup[n], s]][[All, 2]], {n, 1, 8}] // Grid (* Geoffrey Critzer, Jan 18 2019 *)
Formula
Number of terms in row n is A000041(n) (partition numbers). The unit fractions of each row sum to unity: Sum_{k=1..A000041(n)} 1/T(n, k) = 1.
a(n,k) = n!/A181897(n,k). - Geoffrey Critzer, Jan 18 2019
Comments