A166350 Triangle read by rows: T(n,m) = m!, n >= 1.

1, 1, 2, 1, 2, 6, 1, 2, 6, 24, 1, 2, 6, 24, 120, 1, 2, 6, 24, 120, 720, 1, 2, 6, 24, 120, 720, 5040, 1, 2, 6, 24, 120, 720, 5040, 40320, 1, 2, 6, 24, 120, 720, 5040, 40320, 362880, 1, 2, 6, 24, 120, 720, 5040, 40320, 362880, 3628800, 1, 2, 6, 24, 120, 720, 5040, 40320

Offset: 1

Author

Paul Curtz, Oct 12 2009

Keywords

• nonn
• tabl

Examples

			Triangle begins:
  1;
  1, 2;
  1, 2, 6;
  1, 2, 6, 24;
  1, 2, 6, 24, 120;
  1, 2, 6, 24, 120, 720;
  1, 2, 6, 24, 120, 720, 5040;
  ...
		

Links

• Reinhard Zumkeller, Rows n=1..100 of triangle, flattened
• Index entries for sequences related to factorial numbers

Crossrefs

Cf. A000142, A002260, A094310, A077012, A079210.

Cf. A014454.

Row sums give A007489.

Programs

Haskell

import Data.List (inits)
a166350 n k = a166350_tabl !! (n-1) !! (n-1)
a166350_row n = a166350_tabl !! (n-1)
a166350_tabl = tail $ inits $ tail a000142_list
-- Reinhard Zumkeller, Nov 11 2013

Mathematica

Flatten[Table[Range[n]!,{n,11}]] (* Harvey P. Dale, Jan 06 2012 *)
Module[{nn=20,fs},fs=Range[nn]!;Table[Take[fs,n],{n,nn}]]//Flatten (* Harvey P. Dale, Jun 14 2020 *)

Formula

T(n,m) = A000142(m).

Extensions

Definition clarified - R. J. Mathar, Oct 14 2009