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

%I #14 Feb 21 2020 08:35:44

%S 2,3,6,4,12,24,5,20,60,120,6,30,120,360,720,7,42,210,840,2520,5040,8,

%T 56,336,1680,6720,20160,40320,9,72,504,3024,15120,60480,181440,362880,

%U 10,90,720,5040,30240,151200,604800,1814400,3628800,11,110,990,7920,55440,332640,1663200,6652800,19958400,39916800

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

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

%F T(n,k) = A173333(n+1,n-k+1), 1<=k<=n. [_Reinhard Zumkeller_, Feb 19 2010]

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

%Y Cf. A014631.

%K nonn,tabl

%O 2,1

%A _Lekraj Beedassy_, Jul 29 2006

%E Edited by _Don Reble_, Aug 01 2006