A123316 Triangle read by rows: T(n,k)=(k+1)*n!/2 (1<=k<=n).
1, 2, 3, 6, 9, 12, 24, 36, 48, 60, 120, 180, 240, 300, 360, 720, 1080, 1440, 1800, 2160, 2520, 5040, 7560, 10080, 12600, 15120, 17640, 20160, 40320, 60480, 80640, 100800, 120960, 141120, 161280, 181440, 362880, 544320, 725760, 907200, 1088640
Offset: 1
Examples
Triangle begins:
{1},
{2, 3},
{6, 9, 12},
{24, 36, 48, 60},
{120, 180, 240, 300, 360},
{720, 1080, 1440, 1800, 2160, 2520},
{5040, 7560, 10080, 12600, 15120, 17640, 20160}
Crossrefs
Cf. A051683.
Programs
-
Maple
T:=(n,k)->(k+1)*n!/2: for n from 1 to 10 do seq(T(n,k),k=1..n) od; # yields sequence in triangular form
-
Mathematica
t[n_, m_] := (m + 1)*n!/2; a = Table[Table[t[n, m], {m, 1, n}], {n, 1, 10}]; Flatten[a]
Extensions
Edited by N. J. A. Sloane, Dec 03 2006