|
| |
| |
|
|
|
1, 2, 3, 4, 5, 7, 6, 8, 9, 11, 15, 10, 13, 16, 17, 19, 23, 31, 12, 14, 18, 21, 27, 32, 33, 35, 39, 47, 63, 20, 22, 25, 29, 34, 37, 43, 55, 64, 65, 67, 71, 79, 95, 127, 24, 26, 30, 36, 38, 41, 45, 51, 59, 66, 69, 75, 87, 111, 128, 129, 131, 135, 143, 159, 191, 255, 28, 40
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
按行读取三角形T（n，k）。第n行按递增顺序列出n（n>=1，k>=1）整数分区的高架桥编号。整数分区的高架桥编号定义如下。考虑整数分区的费雷尔斯板的东南边界，并考虑通过将每个东阶梯替换为1而每个北阶梯（最后一个除外）替换为0而获得的二进制数。根据定义，相应的十进制形式是给定整数分区的viabin数。“Viabin”是由“via binary”派生而来的。例如，考虑5的整数分区[3,1,1]。费雷尔斯线路板的东南边界为10011，通往19号高架桥（第五排入口）-Emeric Deutsch公司2017年9月6日
指定m的值后，第三个Maple程序生成前m行；命令partovi（p）产生分区p的viabin数=[a，b，c，…]-Emeric Deutsch公司2017年8月31日
|
|
|
链接
|
|
|
|
例子
|
这可以看作是一个不规则的表，其中r行（>=1）具有A000041号（r） 元素，即作为1；2,3; 4,5,7; 6,8,9,11,15; 10,13,16,17,19,23,31; 等。A125106号说明了如何将每个数字映射到分区。
|
|
|
MAPLE公司
|
n：=11:s：=proc（b）局部t，i，j：t：=0：对于i到nops（b）对于j从i+1到nops做（b）如果b[j]-b[i]=1那么t：=t+1 else end if end do end做end做：t end proc:A[n]：={}：对于i to 2^n做A[i]：=转换（2*i，base，2）end do:对于k到2^n do如果s（A[k]）=n那么A[n]:=‘union`（A[n'，{}k}）else end if end do:A[n]#Emeric Deutsch公司2016年2月26日
#第二个Maple项目：
f： =proc（l）局部i，r；r： =0；对于i到nops（l）-1 do
r： =2*（（x->2*x+1）@@（l[i+1]-l[i]））（r）od；第二轮/第二轮
结束时间：
b： =proc（n，i）`if`（n=0或i=1，[[0,1$n]]，[b（n，i-1）[]，
`如果`（i>n，[]，映射（x->[x[]，i]，b（n-i，i））[]]）
结束时间：
T： =n->排序（映射（f，b（n$2）））[]：
#第三届枫叶计划：
m：=10；with（combint）：ff:=proc（X）local s:s:=[1，seq（0，j=1..X[2]）]：s:=map（convert，s，string）：return cat（op（s））end proc:partovi:=prog（P）local X，n，Y，i:X:=convert（P，multiset）：n:=X[-1][1]：Y:=map[操作（X），[i，0]]end-if-end-do:X:=sort（X，proc（s，t）options操作符，箭头：evalb（s[1]<t[1]）end-proc）：X:=map（ff，X）:X:=cat（op（X））：n:=parse（X）:n:=convert（n，decimal，binary）：（1/2）*n end-proc:对于n到m的do{seq（partovi（partition（n）[q]），q=1..numbart（n）}end-do#Emeric Deutsch公司2017年8月31日
|
|
|
数学
|
列=10；
行[n_]：=n-2^楼层[Log2[n]]；
列[0]=0；col[n_]：=如果[EvenQ[n]，col[n/2]+数字计数[n/2，2，1]，col[（n-1）/2]+1]；
清除[T]；T[_，_]=0；Do[T[row[k]，col[k]]=k，{k，1,2^columns}]；
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,标签
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
已批准
|
| |
|
|
