|
|
A123539
|
|
Irregular triangle t(n,m) = binomial(n-m, n-binomial(m, floor(m/2))), read by rows, 0 <= m <= n/2.
|
|
2
|
|
|
0, 1, 2, 1, 3, 1, 4, 1, 1, 5, 1, 1, 6, 1, 1, 1, 7, 1, 1, 1, 8, 1, 1, 1, 6, 9, 1, 1, 1, 10, 10, 1, 1, 1, 15, 1, 11, 1, 1, 1, 21, 6, 12, 1, 1, 1, 28, 21, 0, 13, 1, 1, 1, 36, 56, 0, 14, 1, 1, 1, 45, 126, 0, 0, 15, 1, 1, 1, 55, 252, 0, 0
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
REFERENCES
|
F. R. K. Chung and R. L. Graham, Erdos on Graphs, AK Peters Ltd., Ma, 1998, page 90
|
|
LINKS
|
|
|
EXAMPLE
|
The triangle starts:
0;
1;
2, 1;
3, 1;
4, 1, 1;
5, 1, 1;
6, 1, 1, 1;
7, 1, 1, 1;
8, 1, 1, 1, 6;
9, 1, 1, 1, 10;
10, 1, 1, 1, 15, 1;
|
|
MAPLE
|
binomial(n-m, n-binomial(m, floor(m/2))) ;
|
|
MATHEMATICA
|
t[n_, m_] := Binomial[n - m, n - Binomial[m, Floor[m/2]]] a0 = Table[Table[t[n, m], {m, 0, Floor[n/2]}], {n, 0, 10}] Flatten[a0]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,tabf
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|