A119741 A008279, with the first and last of each row removed.

2, 3, 6, 4, 12, 24, 5, 20, 60, 120, 6, 30, 120, 360, 720, 7, 42, 210, 840, 2520, 5040, 8, 56, 336, 1680, 6720, 20160, 40320, 9, 72, 504, 3024, 15120, 60480, 181440, 362880, 10, 90, 720, 5040, 30240, 151200, 604800, 1814400, 3628800, 11, 110, 990, 7920, 55440, 332640, 1663200, 6652800, 19958400, 39916800

Offset

2,1

Links

Table of n, a(n) for n=2..56.

Formula

a(n) = (A003057(n))!/(A004736(n))! = (A002260(n))!*(A014410(n)).

T(n,k) = A173333(n+1,n-k+1), 1<=k<=n. [Reinhard Zumkeller, Feb 19 2010]

Mathematica

Table[FactorialPower[n, k], {n, 2, 11}, {k, 1, n-1}] // Flatten (* Jean-François Alcover, Feb 21 2020 *)

Crossrefs

Cf. A014631.

Sequence in context: A122866 A097275 A130879 * A268216 A346928 A245712

Adjacent sequences: A119738 A119739 A119740 * A119742 A119743 A119744

Keyword

nonn,tabl

Author

Lekraj Beedassy, Jul 29 2006

Extensions

Edited by Don Reble, Aug 01 2006

Status

approved