|
Search: id:A157000
|
|
|
| A157000 |
|
Triangle read by rows: t(n,k)=(n/k)*Binomial[n - k - 1, k - 1]. |
|
+0
1
|
|
| 2, 3, 4, 2, 5, 5, 6, 9, 2, 7, 14, 7, 8, 20, 16, 2, 9, 27, 30, 9, 10, 35, 50, 25, 2, 11, 44, 77, 55, 11, 12, 54, 112, 105, 36, 2
(list; table; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
COMMENT
|
Row sums are:A001610;
{0, 2, 3, 6, 10, 17, 28, 46, 75, 122, 198, 321,...}.
|
|
REFERENCES
|
J. Riordan, An Introduction to Combinatorial Analysis, Wiley, 1958, pp. 199
|
|
FORMULA
|
t(n,k)=(n/k)*Binomial[n - k - 1, k - 1].
|
|
EXAMPLE
|
{2},
{3},
{4, 2},
{5, 5},
{6, 9, 2},
{7, 14, 7},
{8, 20, 16, 2},
{9, 27, 30, 9},
{10, 35, 50, 25, 2},
{11, 44, 77, 55, 11},
{12, 54, 112, 105, 36, 2}
|
|
MATHEMATICA
|
g[n_, k_] := (n/k)*Binomial[n - k - 1, k - 1];
Table[Table[g[n, k + 1], {k, 0, Floor[n/2] - 1}], {n, 12}];
Flatten[%]
|
|
CROSSREFS
|
Sequence in context: A100798 A121701 A161759 this_sequence A026346 A120636 A117744
Adjacent sequences: A156997 A156998 A156999 this_sequence A157001 A157002 A157003
|
|
KEYWORD
|
nonn,tabl,uned
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Feb 20 2009
|
|
|
Search completed in 0.005 seconds
|
