登录

OEIS由OEIS基金会的许多慷慨捐助者.

 

提示 （来自的问候整数序列在线百科全书!) A213932型 固体标准杨氏表的形状[[n，n，n]，[n，n]]。 6 1, 5, 707, 268326, 168146839, 143163177336, 149998192424502, 182598353781240533, 249032962712552804432, 371285830572997665257695, 594729699502746726969433566, 1010574132470951359396337494800, 1804193873947216124589237862262262 (列表;图表;参考;听;历史;文本;内部格式) 抵消 0,2 评论 还有实心标准杨氏表的形状[[n，n]，[n，n]，[n]]。 链接 阿洛伊斯·海因茨，n=0..30时的n，a（n）表 S.B.Ekhad、D.Zeilberger、，固体标准杨氏表计数的计算和理论挑战，arXiv:1202.6229v1[math.CO]，2012年 维基百科，杨氏矩阵 MAPLE公司 b： =proc（l）选项记忆；局部m；m： =nops（l）； `如果`（{map（x->x[]，l）[]}={0}，1，加（add（`if`（l[i][j]> `如果`（i=m或nops（l[i+1]）<j，0，l[i+1][j]）和l[i][j]> `如果`（nops（l[i]）=j，0，l[i][j+1]），b（底土（i=底土( j=l[i][j]-1，l[i]），l），0），j=1..nops（l[i）），i=1..m） 结束时间： a： =n->b（[[n，n，n]，[n，n]]）： seq（a（n），n=0..10）； 数学 b[l_]：=b[l]=与[｛m=Length[l]｝一起，If[Union[Flatten[l]]=｛0｝，1，Sum[Sum[If[l[[i，j]]>如果[i=m||Length[l[[i+1]]<j，0，l[[i+1，j]]&&l[[i，j]]>如果[Length[l[[i]]==j，0，l[[i，j+1]]，b[RefacePart[l，i->ReplacePart[l[[i]]，j->l[[i，j]]-1]]]，0]，{j，1，长度[l[[i]]}]，{i，1，m}]]]；a[n]：=b[{n，n，n}，{n，n{}]；表[a[n]，{n，0，12}](*Jean-François Alcover公司，2013年12月18日，翻译自枫叶*） 交叉参考 囊性纤维变性。A213978型,A214637号,A214638型. 上下文中的序列：A071772号 A201005号 2015年2月*A199089号 A345357型 A260481型 相邻序列：2013年2月29日 A213930型 A213931型*A213933型 A213934型 A213935型 关键词 非n 作者 阿洛伊斯·海因茨2012年7月23日 状态 经核准的

查找|欢迎光临|维基|寄存器|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间：2024年4月20日04:51 EDT。包含371798个序列。（在oeis4上运行。）