|
|
A125106号 |
| 通过二进制表示枚举分区:每个1是一个部分;零件尺寸比其余数字中的0多出1。 |
|
20
|
|
|
1, 2, 1, 1, 3, 2, 1, 2, 2, 1, 1, 1, 4, 3, 1, 3, 2, 2, 1, 1, 3, 3, 2, 2, 1, 2, 2, 2, 1, 1, 1, 1, 5, 4, 1, 4, 2, 3, 1, 1, 4, 3, 3, 2, 1, 3, 2, 2, 2, 1, 1, 1, 4, 4, 3, 3, 1, 3, 3, 2, 2, 2, 1, 1, 3, 3, 3, 2, 2, 2, 1, 2, 2, 2, 2, 1, 1, 1, 1, 1
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
描述这一点的另一种方法是:从二进制表示开始,计数器设置为1,从右到左计数0。为遇到的每个“1”写一个等于计数器的术语。
有两种方法可以将其视为表:将每个分区作为一行,或将2^(n-1)到2^n-1生成的分区作为一列。
|
|
链接
|
|
|
配方奶粉
|
分区2n是分区n,每个零件尺寸增加1;分区2n+1是具有大小为1的附加部分的分区n。
|
|
例子
|
第4行:
1000 [4]
1001 [3,1]
1010 [3,2]
1011 [2,1,1]
1100 [3,3]
1101 [2,2,1]
1110 [2,2,2]
1111 [1,1,1,1]
|
|
MAPLE公司
|
b: =proc(n)局部c,l,m;l: =[][];m: =n;c: =1;
当m>0时,如果irem(m,2,'m')=0,则c:=c+1
否则l:=c,l fi
od;我
结束时间:
T: =n->seq(b(i),i=2^(n-1)。。2^n-1):
|
|
数学
|
f[k_]:=(bits=IntegerDigits[k,2];zerosCount=Reverse[Accumulate[1-Reverse[bits]]]+1;选择[Transpose[{bits,zerosCounte}],First[#]==1&][[All,2]]);行[n_]:=表[f[k],{k,2^(n-1),2^n-1}];压扁[表格[行[n],{n,1,5}]](*Jean-François Alcover公司2012年1月24日*)
scc[n_]:=连接@@Position[Reverse[IntegerDigits[n,2]],1];
表[Reverse[scc[n]-Range[Length[scc[n]]+1],{n,0,20}](*古斯·怀斯曼2023年1月17日*)
|
|
交叉参考
|
|
|
关键词
|
标签,美好的,非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|