|
|
A248844
|
|
Triangle read by rows: T(m,n) = number of ways of distributing n distinguishable balls into m distinguishable bins of size 2 where empty bins are permitted (m >= 1, 1 <= n <= 2m).
|
|
0
|
|
|
1, 1, 2, 4, 6, 6, 3, 9, 24, 54, 90, 90, 4, 16, 60, 204, 600, 1440, 2520, 2520, 5, 25, 120, 540, 2220, 8100, 25200, 63000, 113400, 113400, 6, 36, 210, 1170, 6120, 29520, 128520, 491400, 1587600, 4082400, 7484400, 7484400, 7, 49, 336, 2226, 14070, 83790, 463680, 2346120, 10636920, 42071400, 139708800, 366735600, 681080400, 681080400
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
FORMULA
|
E.g.f. for row m: (sum(k=0..s) z^k/k!)^m, s=2.
|
|
EXAMPLE
|
Triangle T(n, m) is:
1, 1;
2, 4, 6, 6;
3, 9, 24, 54, 90, 90;
4, 16, 60, 204, 600, 1440, 2520, 2520;
5, 25, 120, 540, 2220, 8100, 25200, 63000, 113400, 113400;
|
|
MAPLE
|
P := proc(n, m, s) n!*coeftayl(add(z^k/k!, k=0..s)^m, z=0, n); end;
|
|
MATHEMATICA
|
Table[nn = 2 n; Drop[Range[0, nn]! CoefficientList[Series[(1 + x + x^2/2!)^n, {x, 0, nn}], x], 1], {n, 0, 7}] // Flatten (* Geoffrey Critzer, Aug 07 2015 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,tabf
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|