#来自在线整数序列百科全书的问候!http://oeis.org/搜索:id:a182743显示第1-1页,共1页%一号A182743%S A182743 3,5,2,4,2,2,7,3,2,2,3,2,2,2,2,2,2,2,2,5,3,3,2,2,2,2,9,4,2,2,2,2,%电话A182743 2,2,5,2,2,2,2,2,2,2,2,2,4,3,2,2,2,2,2,2,2,2%nA182743不包含1作为奇数部分的分区表。%C A182743与A182742的想法相同,但用于奇数整数。%H A182743奥马尔E.波尔,隔墙外壳模型示意图(三维视图)%e A182743数组开始:%e A182743 3,2,2,2,2,2,2,2,2,2,2,2,%e A182743 5,2,2,2,2,2,2,2,2,2,2,%e A182743 4,3,2,2,2,2,2,2,2,2,2,%e A182743 7,2,2,2,2,2,2,2,2,2,%e A182743 3,3,3,2,2,2,2,2,2,2,%e A182743 6,3,2,2,2,2,2,2,2,2,%e A182743 5,4,2,2,2,2,2,2,2,2,%e A182743 9,2,2,2,2,2,2,2,2,%e A182743 5,3,3,2,2,2,2,2,2,%e A182743 4,4,3,2,2,2,2,2,2,%e A182743 8,3,2,2,2,2,2,2,2,%e A182743 7,4,2,2,2,2,2,2,2,%e A182743 6,5,2,2,2,2,2,2,2,%e A182743 11,2,2,2,2,2,2,%e A182743 4,3,3,3,2,2,2,2,2,%e A182743 7,3,3,2,2,2,2,2,%e A182743 6,4,3,2,2,2,2,2,%e A182743 5,5,3,2,2,2,2,2,%e A182743 10,3,2,2,2,2,2,%e A182743 5,4,4,2,2,2,2,2,%e A182743 9,4,2,2,2,2,2,%e A182743 8,5,2,2,2,2,2,%e A182743 7,6,2,2,2,2,2,%p A182743 cmpL:=过程(a,b)局部i;对于从1到min的i(nops(a),nops(b)),如果op(i,a)<op(i,b),则返回-1;elif op(i,a)>op(i,b),然后返回1;结束if;结束do;如果nops(a)>nops(b),则返回1;elif nops(a)<nops(b),然后返回-1;否则返回0;结束if;结束过程:%p A182743 pShellMin:=过程(p)局部idx,j;idx:=1;对于从2到nops(p)的j,如果cmpL(op(j,p),op(idx,p))<0,则idx:=j;结束if;结束do;返回idx;结束过程:%A182F(局部)A182P=285P;如果n<=1,则[n];否则psort:=[];p:=组合[分区](n);当nops(p)>0时m:=pShellMin(p);mmi:=最小值(op(op(m,p)));如果mmi>1,则mma:=最大值(op(op(m,p)));psort:=[op(psort),排序(op(m,p),`>`)];结束if;p:=次音高(m=零,p);结束do:psort;结束if;结束过程:%p A182743,对于n从1到17乘2 do shl:=A141285rowf(n);在shl do中为r在r do printf中为k(“%d”,k);结束do:printf(“\n”);结束do:printf(“\n”);结束日期:2010年12月3日%Y A182743参见A135010、A138121、A141285、A182731、A182742。%Y A182743第1列给出A182733。第2列是A182745。%K A182743无,表,更多%O A182743 1,1%A A182743奥马尔E.波尔,2010年11月30日,2010年12月1日#根据OEIS最终用户许可协议提供内容:http://oeis.org/LICENSE