A322128 Triangular array, read by rows: T(n,k) = denominator of binomial(n-1, n-k)/k!, 1 <= k <= n.

1, 1, 2, 1, 1, 6, 1, 2, 2, 24, 1, 1, 1, 6, 120, 1, 2, 3, 12, 24, 720, 1, 1, 2, 6, 8, 120, 5040, 1, 2, 2, 24, 24, 240, 720, 40320, 1, 1, 3, 3, 12, 90, 180, 5040, 362880, 1, 2, 1, 2, 20, 40, 60, 1120, 40320, 3628800, 1, 1, 2, 1, 4, 20, 24, 336, 8064, 362880, 39916800

Offset: 1

Author

Seiichi Manyama, Nov 27 2018

Keywords

• nonn
• frac
• tabl

Examples

			See A322127.
		

Links

• Seiichi Manyama, Rows n = 1..140, flattened

Crossrefs

Cf. A007318, A322093, A322127.

Programs

Mathematica

T[n_, k_] := Denominator[Binomial[n-1, n-k]/k!]; Table[T[n, k], {n,1,10}, {k,1,n}] // Flatten (* Amiram Eldar, Nov 27 2018 *)