|
Search: id:A154844
|
|
|
| A154844 |
|
Symmetrical triangular sequence of Stirling numbers (A048993) of the second kind: t(n,m)=StirlingS2[n, m] + StirlingS2[n, n - m]. |
|
+0
1
|
|
| 2, 1, 1, 1, 2, 1, 1, 4, 4, 1, 1, 7, 14, 7, 1, 1, 11, 40, 40, 11, 1, 1, 16, 96, 180, 96, 16, 1, 1, 22, 203, 651, 651, 203, 22, 1, 1, 29, 393, 2016, 3402, 2016, 393, 29, 1, 1, 37, 717, 5671, 14721, 14721, 5671, 717, 37, 1, 1, 46, 1261, 15210, 56932, 85050, 56932, 15210, 1261
(list; table; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
COMMENT
|
Row sums are:
{2, 2, 4, 10, 30, 104, 406, 1754, 8280, 42294, 231950,...}
|
|
FORMULA
|
t(n,m)=StirlingS2[n, m] + StirlingS2[n, n - m].
|
|
EXAMPLE
|
{2},
{1, 1},
{1, 2, 1},
{1, 4, 4, 1},
{1, 7, 14, 7, 1},
{1, 11, 40, 40, 11, 1},
{1, 16, 96, 180, 96, 16, 1},
{1, 22, 203, 651, 651, 203, 22, 1},
{1, 29, 393, 2016, 3402, 2016, 393, 29, 1},
{1, 37, 717, 5671, 14721, 14721, 5671, 717, 37, 1},
{1, 46, 1261, 15210, 56932, 85050, 56932, 15210, 1261, 46, 1}
|
|
MATHEMATICA
|
Clear[t, n, m]; t[n_, m_] = StirlingS2[n, m] + StirlingS2[n, n - m];
Table[Table[t[n, m], {m, 0, n}], {n, 0, 10}];
Flatten[%]
|
|
CROSSREFS
|
A048993
Sequence in context: A118107 A155798 A055652 this_sequence A133831 A066955 A089048
Adjacent sequences: A154841 A154842 A154843 this_sequence A154845 A154846 A154847
|
|
KEYWORD
|
nonn,tabl,uned,tabl
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Jan 16 2009
|
|
|
Search completed in 0.003 seconds
|
