| 显示1-1个结果（共1个）。
第页1
1, 1, 0, 1, 2, 0, 1, 2, 0, 2, 7, 2, 0, 2, 6, 1, 4, 6, 2, 12, 24, 3, 8, 0, 8, 32, 6, 2, 13, 26, 6, 34, 36, 0, 32, 150, 3, 20, 50, 14, 54, 126, 32, 32, 12, 55, 160, 78, 122, 44, 174, 4, 72, 294, 36, 201, 896, 128, 62, 180, 176, 164, 198, 852, 110, 320, 159, 212, 414
例子
a（10）=7，因为我们有[10]、[6、3、1]、[6,1、3]、[3,6,1]、[3、1,6]、[1、6,3]和[1、3,6]。
MAPLE公司
h： =proc（n）选项记忆`如果`（n＜1，
`如果`（issqr（8*n+1），1+h（n-1），h（n-l））
结束：
b： =proc（n，i，p）选项记忆；（t->
`如果`（t*（i+2）/3<n，0，`如果`（n=0，p！，b（n，i-1，p）+
`如果`（t>n，0，b（n-t，i-1，p+1）））（（i*（i+1）/2））
结束：
a： =n->b（n，h（n），0）：
数学
h[n_]：=h[n]=如果[n<1，0，如果[IntegerQ@Sqrt[8n+1]，1+h[n-1]，h[n-1]]；
b[n_，i_，p_]：=b[n，i，p]=函数[t，如果[t（i+2）/3<n，0，如果[n==0，p！，b[n、i-1，p]+如果[t>n，0、b[n-t，i-1，p+1]]][（i（i+1）/2）]；
a[n]：=b[n，h[n]，0]；
交叉参考
囊性纤维变性。A000217号,A023361号,A024940号,A032020型,A032021年,A032022号,A218396型,A219107型,A331844型,A331845美元,A331846,A331847飞机.
搜索在0.005秒内完成
| 