proposed
approved
proposed
approved
editing
proposed
Table[n!/(2^k (n - 2 k)!), {n, 2, 13}, {k, Floor[n/2]}] // Flatten (* Michael De Vlieger, Nov 04 2016 *)
proposed
editing
editing
proposed
T(n,k) is also the number of involutions (unary operators) on S_n, i.e., endomorfisms endomorphisms U with 2k non-invariant elements such that U^2 is the identity mapping. The extension to n=1 is a(1)=0. - Stanislav Sykora, Nov 03 2016
T(n,k) is also the number of involutions (unary operators (involutions) on S_n, i.e., endomorfisms U with 2k non-invariant elements such that U^2 is the identity mapping. The extension to n=1 is a(1)=0. - Stanislav Sykora, Nov 03 2016
Wikipedia, <a href="http://en.wikipedia.org/wiki/Involution_(mathematics)">Involution (mathematics)</a>.
proposed
editing
editing
proposed
E.g.f.: y*x^2*exp(x)/(2-y*x^2). T(n,k) = Product_{m=1..floor(n/2)} binomial(n-2*m,2) = n!/(2^k*(n-2*k)!).
T(n,k) = Product_{m=1..floor(n/2)} binomial(n-2*m,2) = n!/(2^k*(n-2*k)!).
proposed
editing
editing
proposed
For n = 4 we have 12 lists, : 6 1-lists: [{1,2}], [{1,3}], [{1,4}], [{2,3}], [{2,4}], [{3,4}] and 6 2-lists: [{1,2},{3,4}], [{3,4},{1,2}], [{1,3},{2,4}], [{2,4},{1,3}], [{1,4},{2,3}] and [{2,3},{1,4}].
proposed
editing