A273712-OEIS公司

A273712型

n层上k元堆的数量A（n，k）；方阵A（n，k），n>=0，k>=0。

1，1，1，1，1，0，1，1，1，0，1，2，1，0，1，1，6，80，1，0，1，1，24，7484400，21964800，1，0，1，1，120，38926443213082624，35417271278873496315860673177600000000，74836825861835980800000，1，0 (列表；桌子；图表；参考；听；历史；文本；内部格式)

	抵消	`0,13`
	链接	`阿洛伊斯·海因茨，反对角线n=0..9，平坦` `维基百科，D元堆`
	例子	`方阵A（n，k）开始：` `1, 1, 1, 1, ...` `1, 1, 1, 1, ...` `0, 1, 2, 6, ...` `0, 1, 80, 7484400, ...` `0, 1, 21964800, 35417271278873496315860673177600000000, ...`
	MAPLE公司	`使用（组合）：` `b： =proc（n，k）选项记忆；局部h，i，x，y，z；` `如果n＜2，则1 elif k＜2，则k` `否则h:=ilog[k]（（k-1）n+1）；` `如果k^h=（k-1）n+1，则b（（n-1）/k，k）^k` `多项式（n-1，（n-1）/k）$k）` `否则x，y:=（k^h-1）/（k-1），（k^（h-1）-1）/（k-1）；` `对于从0开始的i，做z：=（n-1）-（k-1-i）y-ix；` `如果y<=z和z<=x，则b（y，k）^（k-1-i）` `多项式（n-1，y$（k-1-i），x$i，z）` `b（x，k）^ib（z，k）；断开fi` `日` `无线网络` `结束时间：` A： =（n，k）->`如果`（n<2，1，`如果`）（k<2，k，b（（k^n-1）/（k-1），k））： `seq（seq（A（n，d-n），n=0..d），d=0..7）；`
	数学	`多项式[n_，k_List]：=n/次数@@（k！）；` `b[n_，k_]：=b[n，k]=模[{h，i，x，y，z}，其中[n<2，1，k<2，k，True，h=Log[k，（k-1）n+1]//层；如果[k^h==（k-1）n+1，b[（n-1）/k，k]^k多项式[n-1，数组[（n-1）/k&，k]]，{x，y}:={（k^h-1）/（k-1；对于[i=0，True，i++，z=（n-1）-（k-1-i）y-ix；如果[y<=z&&z<=x，b[y，k]^（k-1-i）多项式[n-1，连接[Array[y&，k-1-i]，Array[x&，i]，{z}]b[x，k]ib[z，k]；中断[]]]]]；` `A[n_，k_]：=如果[n<2，1，如果[k<2，k，b[（k^n-1）/（k-1），k]]；` `表[A[n，d-n]，{d，0，7}，{n，0，d}]//展平(Jean-François Alcover公司2017年1月24日之后阿洛伊斯·海因茨*)`
	交叉参考	`k=0-4列给出：A019590型（n+1），A000012号,A056972号,A273723型,A273725型.` `主对角线给出A273729型.` `囊性纤维变性。A273693型.` `上下文中的序列：A226690型 A318557型 A245683型A129634号 A266825型 A066438号` `相邻序列：A273709型 A273710型 A273711型A273713型 A273714型 A273715型`
	关键词	`非n,表`
	作者	`阿洛伊斯·海因茨2016年5月28日`
	状态	`经核准的`