%I#7 2021年7月12日13:47:44

%S 1,1,3,461951876511143227643644355439169502427338628，

%电话：18277511616272107762602350793129360862485721142820，

%电话：58102220403682965302534344801581191354013307133604413871534219465460022537502037213490716505307815745011707670820

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

%H Alois P.Heinz，n表，n=0..500时的a（n）</a>

%F a（n）=A261835（n，n）。

%pb:=proc（n，i，p，k）选项记忆；

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

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

%p端：

%pa:=n->b（2，0，n美元）：

%p序列（a（n），n=0..30）；

%tb[n，i，p，k]：=b[n，i，p，k]=

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

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

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

%t表[a[n]，{n，0，30}]（*_Jean-François Alcover_，2021年7月12日，在_Alois P.Heinz_*之后）

%Y A261835的主对角线。

%K nonn公司

%0、3

%A _Alois P.Heinz，2015年9月2日