|
| |
|
| A152969号 |
| 按行读取三角形：T（n，m）=楼层[（m/n）*行（n）]。 |
|
0
|
|
|
|
1, 1, 1, 1, 6, 1, 1, 23, 23, 1, 1, 48, 286, 48, 1, 1, 384, 1535, 1535, 384, 1, 1, 3840, 7680, 23038, 7680, 3840, 1, 1, 46080, 92160, 184319, 184319, 92160, 46080, 1, 1, 645120, 1290240, 1935360, 2580478, 1935360, 1290240, 645120, 1, 1, 10321920, 20643840
(列表；桌子；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
0,5
|
|
|
评论
|
|
|
|
链接
|
|
|
|
例子
|
{1},
{1, 1},
{1, 6, 1},
{1, 23, 23, 1},
{1, 48, 286, 48, 1},
{1, 384, 1535, 1535, 384, 1},
{1, 3840, 7680, 23038, 7680, 3840, 1},
{1, 46080, 92160, 184319, 184319, 92160, 46080, 1},
{1, 645120, 1290240, 1935360, 2580478, 1935360, 1290240, 645120, 1},
{1, 10321920, 20643840, 30965760, 30965759, 30965759, 30965760, 20643840, 10321920, 1},
{1, 185794560, 371589120, 557383680, 743178240, -2, 743178240, 557383680, 371589120, 185794560, 1}
|
|
|
数学
|
清除[v，n，row，f]；行[n_]=2^n*n！；
f[n_，m_]=楼层[（m/n）*行[n]/2]；v[0]={1}；v[1]={1,1}；
v[n_]：=v[n]=如果[Mod[n，2]==0，连接[{1}，表[f[n，m]，{m，1，楼层[n/2]-1}]，{row[n]-2*总和[f[n]，{m]，1，楼板[n/2]-1}]-2}，
连接[{1}，表[f[n，m]，{m，1，楼层[n/2]-1}]，{row[n]/2-总和[f[n,m]，}m，1、楼层[n/2]-1}]-1，行[n]/2-总和[f[n，m]，{m，1，楼板[n/2]-1}]-1}，表格[f[n，m]、{m，楼层[n/2]-1，1，-1}]、{1}]]；
表[v[n]，{n，0，10}]；压扁[%]
|
|
|
交叉参考
|
|
|
|
关键词
|
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
