|
| |
|
|
A156717
|
|
A symmetrical sequence: t(n,m)=Binomial[n + m - 1, 2*m] + Binomial[n + n - m - 1 - 1, 2*(n - m - 1)].
|
|
0
| |
|
|
2, 2, 2, 2, 6, 2, 2, 11, 11, 2, 2, 17, 30, 17, 2, 2, 24, 63, 63, 24, 2, 2, 32, 115, 168, 115, 32, 2, 2, 41, 192, 375, 375, 192, 41, 2, 2, 51, 301, 748, 990, 748, 301, 51, 2, 2, 62, 450, 1379, 2288, 2288, 1379, 450, 62, 2
(list; table; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,1
|
|
|
COMMENTS
| Row sums are:
{2, 4, 10, 26, 68, 178, 466, 1220, 3194, 8362,...}
|
|
|
FORMULA
| (n,m)=Binomial[n + m - 1, 2*m] + Binomial[n + n - m - 1 - 1, 2*(n - m - 1)].
|
|
|
EXAMPLE
| {2},
{2, 2},
{2, 6, 2},
{2, 11, 11, 2},
{2, 17, 30, 17, 2},
{2, 24, 63, 63, 24, 2},
{2, 32, 115, 168, 115, 32, 2},
{2, 41, 192, 375, 375, 192, 41, 2},
{2, 51, 301, 748, 990, 748, 301, 51, 2},
{2, 62, 450, 1379, 2288, 2288, 1379, 450, 62, 2}
|
|
|
MAPLE
| Table[Table[ Binomial[n + m - 1, 2*m] + Binomial[n + n - m - 1 - 1, 2*(n - m - 1)], {m, 0, n - 1}], {n, 1, 10}];
Flatten[%]
|
|
|
CROSSREFS
| Sequence in context: A103794 A073124 A070877 * A198889 A130754 A164126
Adjacent sequences: A156714 A156715 A156716 * A156718 A156719 A156720
|
|
|
KEYWORD
| nonn,tabl,uned
|
|
|
AUTHOR
| Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Feb 14 2009
|
| |
|
|
