搜索: a335942-编号:a335952
|
|
A335941型
|
| n的分区数,使得部分集和重数集满足s={1..max(s)}。 |
|
+10 2
|
|
|
1, 1, 2, 1, 1, 4, 2, 5, 5, 9, 8, 15, 11, 14, 22, 28, 30, 36, 37, 53, 60, 80, 83, 104, 114, 148, 157, 201, 218, 283, 284, 362, 400, 455, 518, 624, 697, 807, 907, 1036, 1181, 1368, 1531, 1727, 1990, 2197, 2563, 2849, 3182, 3568, 4095, 4548, 5143, 5720, 6420
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,3
|
|
链接
|
|
|
例子
|
a(0)=1:空分区。
a(1)=1∶1。
a(2)=2:11,2。
a(3)=1:21。
a(4)=1:211。
a(5)=4:2111、221、311、32。
a(6)=2:2211,321。
a(7)=5:22111、2221、3211、322、331。
a(8)=5:22211、32111、3221、3311、332。
a(9)=9:222111、321111、32211、3222、33111、3321、42111、4311、432。
a(10)=8:2221111、322111、32221、331111、33211、4222、4321、433。
|
|
MAPLE公司
|
b: =proc(n,i,s)选项记忆;
`如果`(n=0,`如果`(s={$0..max(s)},1,0),`如果'(i<1,0,add(
b(n-i*j,i-1,{s[],j,`如果`(j=0,0,i)}),j=0..n/i))
结束时间:
a: =n->b(n,楼层((sqrt(1+8*(n+1))-1)/2),{0}):
seq(a(n),n=0..55);
|
|
数学
|
b[n,i_,s]:=b[n、i、s]=
如果[n==0,如果[s==Range[0,Max[s]],1,0],如果[i<1,0,Sum[
b[n-i*j,i-1,扁平接头@{s,j,如果[j==0,0,i]}],{j,0,n/i}]];
a[n_]:=b[n,楼层[(Sqrt[1+8*(n+1)]-1)/2],{0}];
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|
|
A338271型
|
| a(n)是n,b1+…+的组成数b_t=n,这样sqrt(b_1+sqrt……+sqrt(b_t)…)是一个整数。 |
|
+10 2
|
|
|
1, 0, 0, 2, 0, 2, 0, 2, 2, 4, 2, 6, 2, 8, 4, 14, 6, 20, 8, 28, 14, 44, 20, 66, 30, 96, 46, 146, 70, 220, 102, 326, 154, 490, 232, 740, 346, 1102, 520, 1652, 782, 2484, 1166, 3716, 1750, 5568, 2628, 8358, 3936, 12518, 5900, 18760, 8848, 28138, 13256, 42170
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,4
|
|
评论
|
a(n)<=总和{k=1..层(sqrt(n)/2)}A338286型当n为偶数时(floor(n-4*k^2)/2)。
a(n)<=总和{k=1..层((sqrt(n)-1)/2)}A338286型当n为奇数且大于1时,(floor((n-4*k^2-4*k-1)/2)。
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
(为了简洁起见,设s(k)=sqrt(k)。)
对于n=14,a(14)=8的有效组成为:
14=2+2+2+2+2+3+1和2=s(2+s(2+s(2+4(2+s(3+s(1))))
14=1+7+2+3+1和2=s(1+s(7+s(2+s(3+s(1))))
14=2+1+7+3+1和2=s(2+s(1+s(7+s(3+s(1))))
14=2+2+1+8+1和2=s(2+s(2+s(1+s(8+s(1))))
14=2+2+2+2+2+4和2=s(2+s(2+s(2+4(2+s(4))))
14=1+7+2+4和2=s(1+s(7+s(2+s(4)))
14=2+1+7+4和2=s(2+s(1+s(7+s(4)))
14=2+2+1+9和2=s(2+s(2+s(1+s(9)))
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|
|
|
|
1、1、2、2、5、8、13、24、42、68、122、210、360、622、1077、1858、3198、5519、9549、16460、28386、49031、84595、145988、251956、434805、750418、1294998、2234971、3857106、6656383、11487641、19825318、34214136、59046458、101901743、175860875、303498779
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,3
|
|
链接
|
|
|
例子
|
a(0)=1:空成分。
a(1)=1:1。
a(2)=2:2,11。
a(3)=2:3111。
a(4)=5:4、22、112、211、1111。
a(5)=8:5、113、122、221、311、1112、2111、11111。
a(6)=13:6、33、114、222、411、1113、1221、2112、3111、11112、11211、21111、111111。
a(7)=24:7、115、133、223、322、331、511、1114、1222、2113、2221、3112、4111、11113、11122、11311、21112、22111、31111、11111 2、111211、112111、211111、1111111。
a(8)=42:8、44、116、224、233、332、422、611、1115、1223、1331、2114、2222、3113、3221、4112、5111、11114、11222、11411、12221、21113、22211、31112、41111、11111 3、111122、111221、111311、112112、113111、122111、211112、211211、221111、311112、1111211、1112111、1121111、11111。
|
|
MAPLE公司
|
b: =proc(n,l,t)选项记忆`如果`(n=0,1,添加(add(
`如果`(j=t,0,b(n-i*j,i,j)),j=1..n/i),i={$1..n}减去{l}))
结束时间:
a: =n->b(n,0$2):
seq(a(n),n=0..40);
|
|
数学
|
b[n_,l_,t_]:=b[n,l,t]=如果[n==0,1,Sum[Sum[If[j==t,0,
b[n-i*j,i,j]],{j,1,n/i}],{i,范围[n]~补码~{l}}]];
a[n]:=b[n,0,0];
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
已批准
|
|
|
搜索在0.004秒内完成
|