登录
OEI由许多慷慨的捐赠者给OEIS基金会.

 

标志
提示
(问候来自整数序列在线百科全书!)
邮编:A182743 不包含1作为奇数整数一部分的分区表。 24

%我

%第3,5,2,4,2,2,7,3,2,2,3,2,2,2,2,6,3,2,2,5,3,2,2,2,2,2,2,2,2,2,2,2,2,

%T 2,2,5,2,2,2,2,2,2,2,4,3,2,2,2,2,2,2,2,2

%N不包含1作为奇数整数一部分的分区表。

%与A182742的想法相同,但对于奇数整数。

%polomah=“http://www.polprimos.com/imagesepub/polpa3dt.jpg“>隔墙外壳模型说明(3D视图)</a>

%数组开始:

%e 3,2,2,2,2,2,2,2,2,2,2,

%e 5,2,2,2,2,2,2,2,2,2,

%e 4,3,2,2,2,2,2,2,2,2,

%e 7,2,2,2,2,2,2,2,2,

%e 3,3,3,2,2,2,2,2,2,2,

%e 6,3,2,2,2,2,2,2,2,

%e 5,4,2,2,2,2,2,2,2,

%e 9,2,2,2,2,2,2,2,

%e 5,3,3,2,2,2,2,2,2,

%e 4,4,3,2,2,2,2,2,2,

%e 8,3,2,2,2,2,2,2,

%e 7,4,2,2,2,2,2,2,

%e 6,5,2,2,2,2,2,2,

%e 11,2,2,2,2,2,2,

%e 4,3,3,3,2,2,2,2,2,

%e 7,3,3,2,2,2,2,2,

%e 6,4,3,2,2,2,2,2,

%e 5,5,3,2,2,2,2,2,

%e 10,3,2,2,2,2,2,

%e 5,4,4,2,2,2,2,2,

%e 9,4,2,2,2,2,2,

%e 8,5,2,2,2,2,2,

%e 7,6,2,2,2,2,2,

%p 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 pShellMin:=proc(p)局部idx,j;idx:=1;对于从2到nops(p)的j,如果cmpL(op(j,p),op(idx,p))<0,则idx:=j;结束if;结束do;返回idx;结束过程:

%p A141285rowf:=proc(n)局部p;如果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代表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日

%参见A135010、A138121、A141285、A182731、A182742。

%Y列1给出A182733。第2列是A182745。

%不,表,更多

%O 1,1号

%2010年11月30日

查找|欢迎光临|维基|登记|音乐|2号地块|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索者|最近
OEIS社区|维护人OEIS基金公司。

许可协议,使用条款,隐私政策。.

上次修改时间:2022年1月17日11:29 EST。包含350394个序列。(运行在oeis4上。)