|
|
A177815
|
|
Triangle read by rows: binomial(n, m^3).
|
|
0
|
|
|
1, 1, 1, 1, 2, 1, 3, 1, 4, 1, 5, 1, 6, 1, 7, 1, 8, 1, 1, 9, 9, 1, 10, 45, 1, 11, 165, 1, 12, 495, 1, 13, 1287, 1, 14, 3003, 1, 15, 6435, 1, 16, 12870, 1, 17, 24310, 1, 18, 43758, 1, 19, 75582, 1, 20, 125970
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,5
|
|
COMMENTS
|
Row sums are: {1, 2, 3, 4, 5, 6, 7, 8, 10, 19, 56, 177, 508, 1301, 3018, 6451, 12887, 24328, 43777, 75602, 125991,...}.
First length 4 row is: {1, 27, 2220075, 1}.
|
|
LINKS
|
|
|
EXAMPLE
|
{1},
{1, 1},
{1, 2},
{1, 3},
{1, 4},
{1, 5},
{1, 6},
{1, 7},
{1, 8, 1},
{1, 9, 9},
{1, 10, 45},
{1, 11, 165},
{1, 12, 495},
{1, 13, 1287},
{1, 14, 3003},
{1, 15, 6435},
{1, 16, 12870},
{1, 17, 24310},
{1, 18, 43758},
{1, 19, 75582},
{1, 20, 125970},
...
{1, 27, 2220075, 1}
|
|
MATHEMATICA
|
t[n_, m_] = Binomial[n, m^3];
Table[Table[t[n, m], {m, 0, Floor[n^(1/3)]}], {n, 0, 20}];
Flatten[%]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,tabf,changed
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|