(鼠尾草)
定义CEN(m,len):
f、 e,r,u=[1],[1],[1]
对于(1..len-1)中的i:
f.append(升_阶乘(u,m))
对于范围(i-1,-1,-1)中的k:
e[k]=(e[k]*f[i])//f[i-k]
s=总和(e);e.附录;r.附加
u+=米
返回r
(鼠尾草)#替代品
定义压缩字3(n):
shapes=[[x**3表示p中的x]表示分区(n)中的p]
return sum([factorial(len(s))*SetPartitions(sum(s,s).cardiality()for s in shapes)])
[(0..13)中n的PackedWords3(n)]#彼得·卢什尼2015年8月2日
(PARI)seq(n)={my(a=向量(n+1));a[1]=1;对于(n=1,n,a[1+n]=和(k=1,n,二项式(3*n,3*k)*a[1+n-k]);a}\\安德鲁·霍罗伊德2020年1月21日