提议的

经核准的

编辑

提议的

b[n，i，p，k]：=b[n、i、p、k]=

如果[i（i+1）/2<n，0，如果[n==0，p！，b[n，i-1，p，k]+

如果[i>n，0，b[n-i，i-1，p+1，k]*二项式[i+k-1，k-1]]；

a[n]：=b[n，n，0，n]；

表[a[n]，{n，0，30}](*让-弗朗索瓦·奥尔科弗2021年7月12日之后阿洛伊斯·海因茨*)

经核准的

编辑

编辑

经核准的

Alois P.Heinz，<a href=“/261837元/b261837.txt“>n表，n=0..500时为a（n）</a>

b： =proc（n，i，p，k）选项记忆；

`如果`（i*（i+1）/2<n，0，`如果`（n=0，p！，b（n，i-1，p，k）+

`如果`（i>n，0，b（n-i，i-1，p+1，k）*二项式（i+k-1，k-1）））

结束时间：

a： =n->b（2，0，n美元）：

seq（a（n），n=0..30）；

分配给Alois P.Heinz

n组成不同部分的数字，其中每个部分i在n元字母表上用长度为i的单词标记，字母按字母顺序排列。

1, 1, 3, 46, 195, 1876, 51114, 322764, 3644355, 43916950, 2427338628, 18277511616, 272107762602, 3507931293608, 62485721142820, 5810222040368296, 53025343448015811, 913540133071336044, 13871534219465464002, 253750203721349071650, 5307815745011707670820

0,3

a（n）=A261835型（n，n）。

的主对角线A261835型.

分配

非n

阿洛伊斯·海因茨2015年9月2日

经核准的

编辑

分配给Alois P.Heinz

分配

经核准的