|
| |
|
|
A117506
|
|
Irregular triangle read by rows: dimensions of the irreducible representations of the symmetric group S_n.
|
|
27
|
|
|
|
1, 1, 1, 1, 1, 2, 1, 1, 3, 2, 3, 1, 1, 4, 5, 6, 5, 4, 1, 1, 5, 9, 5, 10, 16, 5, 10, 9, 5, 1, 1, 6, 14, 14, 15, 35, 21, 21, 20, 35, 14, 15, 14, 6, 1, 1, 7, 20, 28, 14, 21, 64, 70, 56, 42, 35, 90, 56, 70, 14, 35, 64, 28, 21, 20, 7, 1
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,6
|
|
|
COMMENTS
|
The n-th row has partition(n) = A000041(n) entries.
Also the numbers of standard Young tableaux for Young diagrams (or partitions).
Also "generalized" Catalan numbers. For a partition of n, n=(n_1+...+n_d), this is the number of integral lattice paths from (0,...,0) to (n_1,...,n_d) such that for any point p=(p_1,...p_d) on such a path p_i is never less than p_j whenever i<j. - Graham H. Hawkes, Jul 05 2013
The irreducible representations of S_n correspond to Young diagrams or partitions.
Partitions of n are ordered according to Abramowitz-Stegun (A-St) (see the reference, pp. 831-2). In contrast to A-St, a partition has nondecreasing parts (reverse notation of A-St).
The dimension of a representation of S_n corresponding to a Young diagram or partition is a(n,k) for the k-th partition of n in this A-St order.
The first formula given below appears in A. Young, Q.S.A. III, PLMS 28 (1928) 255-292 (third paper on "On Quantitative Substitutional Analysis"), Theorem II on p. 260, and he calls it f; see the collected papers (CP) reference, p. 357. Note the shorthand notation for the products; see Q.S.A. II, PLMS 34 (1902) 361-397, p. 366, CP, p. 97, for the explicit one.
This formula also can be found in the Glass-Ng link, Theorem 1, p. 702, using the Vandermonde determinant in the numerator and re-indexing the denominator.
The product of the hook length numbers, called H(n, k) in this formula below, is found in A263003(n, k).
The squared row entries sum to n!. See A. Young, Q.S.A. II (see above), pp. 367-368, CP pp. 98-99. Also Q.S.A. III, p. 265, CP p. 362.
(End)
|
|
|
REFERENCES
|
G. de B. Robinson (ed.), The Collected Papers of Alfred Young 1873-1940, University of Toronto Press, 1977.
G. B. Wybourne, Symmetry principles and atomic spectroscopy, Wiley, New York, 1970, p. 9.
|
|
|
LINKS
|
M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards, Applied Math. Series 55, Tenth Printing, 1972 [alternative scanned copy].
|
|
|
FORMULA
|
a(n,k) = n!/H(n,k) with H(n,k):= Product_{i=1..m(n,k)} (x_i)!/Det(x_i^(m(n,k)-j)) with the Vandermonde determinant for the variables x_i:=lambda(n,k)_i + m(n,k)-i, i,j=1..m(n,k) if m(n,k) is the number of parts of the k-th partition of n, called lambda(n,k), in the A-St order (see above). Lambda(n,k)_i denotes the i-th part of the partition lambda(n,k), sorted in decreasing order (this is the reverse of the A-St notation).
a(n,k) = n!/Product_{j=1..n}(h(n,k,j) with the hook numbers h(n,k,j) of the Young diagram of the partition lambda(n,k) in the A-St order. See the link for 'hook length formula'.
|
|
|
EXAMPLE
|
[1];
[1];
[1, 1];
[1, 2, 1];
[1, 3, 2, 3, 1];
[1, 4, 5, 6, 5, 4, 1];
[1, 5, 9, 5, 10, 16, 5, 10, 9, 5, 1];...
a(4,4)=3 because the 4th partition of n=4 in A-St order is [2,1,1],
and H(4,4)=(4!*2!*1!)/Vandermonde([4,2,1]) = (4!*2)/6 =4*2, hence
4!/H(4,4) = 3.
a(4,4)=3 because the hook lengths of the Young diagram of [2,1,1] are [4, 1; 2; 1], hence 4!/(4*1*2*1) = 3.
The sum of the squared entries of each row gives n!: n = 5: 2*(1^1 + 4^2 + 5^2) + 6^2 = 120 = 5!. - Wolfdieter Lang, Oct 09 2015
|
|
|
MAPLE
|
h:= l-> (n-> mul(mul(1+l[i]-j+add(`if`(l[k]>=j, 1, 0),
k=i+1..n), j=1..l[i]), i=1..n))(nops(l)):
g:= (n, i, l)-> `if`(n=0 or i=1, [h([l[], 1$n])],
[g(n, i-1, l)[], g(n-i, min(n-i, i), [l[], i])[]]):
T:= n-> map(x-> n!/x, g(n$2, []))[]:
|
|
|
MATHEMATICA
|
h[l_List] := Function[n, Product[Product[1 + l[[i]] - j + Sum[If[l[[k]] >= j, 1, 0], {k, i+1, n}], {j, 1, l[[i]]}], {i, 1, n}]][Length[l]]; g[n_, i_, l_List] := If[n==0 || i==1, Join[{h[Join[l, Array[1&, n]]]}], If[i<1, {}, Join[{g[n, i-1, l]}, If[i>n, {}, g[n-i, i, Join[l, {i}]]]]]] // Flatten; T[n_] := n!/ g[n, n, {}]; Table[T[n], {n, 0, 10}] // Flatten (* Jean-François Alcover, Dec 19 2015, after Alois P. Heinz *)
|
|
|
CROSSREFS
|
|
|
|
KEYWORD
|
nonn,easy,tabf
|
|
|
AUTHOR
|
|
|
|
EXTENSIONS
|
|
|
|
STATUS
|
approved
|
| |
|
|
