|
| |
|
|
A153189
|
|
Triangle sequence: t(n,m)=Product[m*k + 1, {k, 0, n}].
|
|
0
| |
|
|
1, 2, 1, 3, 15, 1, 4, 28, 280, 1, 5, 45, 585, 9945, 1, 6, 66, 1056, 22176, 576576, 1, 7, 91, 1729, 43225, 1339975, 49579075, 1, 8, 120, 2640, 76560, 2756160, 118514880, 5925744000, 1, 9, 153, 3825, 126225, 5175225, 253586025, 14454403425
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| Row sums are:
{0, 2, 18, 312, 10580, 599880, 50964102, 6047094368, 954249517512,
193146844030200, 48762935887310810,...}
|
|
|
FORMULA
| t(n,m)=Product[m*k + 1, {k, 0, n}]; t(n,m)=m^(1+n)*Pochhammer[1/m,n+1].
|
|
|
EXAMPLE
| {1, 2},
{1, 3, 15},
{1, 4, 28, 280},
{1, 5, 45, 585, 9945},
{1, 6, 66, 1056, 22176, 576576},
{1, 7, 91, 1729, 43225, 1339975, 49579075},
{1, 8, 120, 2640, 76560, 2756160, 118514880, 5925744000},
{1, 9, 153, 3825, 126225, 5175225, 253586025, 14454403425, 939536222625},
{1, 10, 190, 5320, 196840, 9054640, 498005200, 31872332800, 2326680294400, 190787784140800},
{1, 11, 231, 7161, 293601, 14973651, 913392711, 64850882481, 5252921480961, 478015854767451, 48279601331512551}
|
|
|
MATHEMATICA
| t[n_, m_] =Product[m*k + 1, {k, 0, n}];
Table[Table[t[n, m], {n, 0, m}], {m, 1, 10}];
Flatten[%]
|
|
|
CROSSREFS
| A008544,A000165
Sequence in context: A175243 A168217 A007447 * A095852 A000618 A132950
Adjacent sequences: A153186 A153187 A153188 * A153190 A153191 A153192
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Dec 20 2008
|
| |
|
|
