|
Search: id:A141905
|
|
|
| A141905 |
|
A skew trinomial summed triangular sequence of coefficients: t(n,m)=Sum[n!/((n - m - k)!*m!*k!), {k, 0, m}]. |
|
+0 1
|
|
| 1, 1, 1, 1, 4, 1, 1, 9, 6, 1, 1, 16, 24, 8, 1, 1, 25, 70, 40, 10, 1, 1, 36, 165, 160, 60, 12, 1, 1, 49, 336, 525, 280, 84, 14, 1, 1, 64, 616, 1456, 1120, 448, 112, 16, 1, 1, 81, 1044, 3528, 3906, 2016, 672, 144, 18, 1, 1, 100, 1665, 7680, 11970, 8064, 3360, 960, 180, 20, 1
(list; graph; listen)
|
|
|
OFFSET
|
1,5
|
|
|
COMMENT
|
Row sums are:
{1, 2, 6, 17, 50, 147, 435, 1290, 3834, 11411, 34001}.
|
|
FORMULA
|
t(n,m)=Sum[n!/((n - m - k)!*m!*k!), {k, 0, m}].
|
|
EXAMPLE
|
{1},
{1, 1},
{1, 4, 1},
{1, 9, 6, 1},
{1, 16, 24, 8, 1},
{1, 25, 70, 40, 10, 1},
{1, 36, 165, 160, 60, 12, 1},
{1, 49, 336, 525, 280, 84, 14, 1},
{1, 64, 616, 1456, 1120, 448, 112, 16, 1},
{1, 81, 1044, 3528, 3906, 2016, 672, 144, 18, 1},
{1, 100, 1665, 7680, 11970, 8064, 3360, 960, 180, 20, 1}
|
|
MATHEMATICA
|
Clear[t, n, m]; t[n_, m_] = Sum[n!/((n - m - k)!*m!*k!), {k, 0, m}]; Table[Table[t[n, m], {m, 0, n}], {n, 0, 10}]; Flatten[%]
|
|
CROSSREFS
|
Sequence in context: A055107 A128137 A136100 this_sequence A114188 A110511 A082950
Adjacent sequences: A141902 A141903 A141904 this_sequence A141906 A141907 A141908
|
|
KEYWORD
|
nonn,uned
|
|
AUTHOR
|
Roger L. Bagula and Gary W. Adamson (rlbagulatftn(AT)yahoo.com), Sep 14 2008
|
|
|
Search completed in 0.002 seconds
|