A153188 Triangle sequence: t(n,m)=Product[m*k, {k, 1, n}].

1, 2, 8, 3, 18, 162, 4, 32, 384, 6144, 5, 50, 750, 15000, 375000, 6, 72, 1296, 31104, 933120, 33592320, 7, 98, 2058, 57624, 2016840, 84707280, 4150656720, 8, 128, 3072, 98304, 3932160, 188743680, 10569646080, 676457349120, 9, 162, 4374, 157464

Offset

1,2

Comments

Row sums are: {1, 10, 183, 6564, 390805, 34557918, 4237440627, 687219772552, 142347286888209, 36654963132246210,...}

Links

Table of n, a(n) for n=1..40.

Formula

t(n,m)=Product[m*k, {k, 1, n}]; t(n,m)=m^n*n!.

Example

{1},
{2, 8},
{3, 18, 162},
{4, 32, 384, 6144},
{5, 50, 750, 15000, 375000},
{6, 72, 1296, 31104, 933120, 33592320},
{7, 98, 2058, 57624, 2016840, 84707280, 4150656720},
{8, 128, 3072, 98304, 3932160, 188743680, 10569646080, 676457349120},
{9, 162, 4374, 157464, 7085880, 382637520, 24106163760, 1735643790720, 140587147048320},
{10, 200, 6000, 240000, 12000000, 720000000, 50400000000, 4032000000000, 362880000000000, 36288000000000000}

Mathematica

t[n_, m_] =Product[m*k, {k, 1, n}];
Table[Table[t[n, m], {n, 1, m}], {m, 1, 10}];
Flatten[%]

Crossrefs

Cf. A008544, A000165.

Sequence in context: A083003 A364130 A278117 * A193976 A264244 A292930

Adjacent sequences: A153185 A153186 A153187 * A153189 A153190 A153191

Keyword

nonn,tabl

Author

Roger L. Bagula, Dec 20 2008

Status

approved