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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A119441号 的分布A063834号阿布拉莫维茨和斯特根命令。 5
1, 2, 1, 3, 2, 1, 5, 3, 4, 2, 1, 7, 5, 6, 3, 4, 2, 1, 11, 7, 10, 9, 5, 6, 8, 3, 4, 2, 1, 15, 11, 14, 15, 7, 10, 9, 12, 5, 6, 8, 3, 4, 2, 1, 22, 15, 22, 21, 25, 11, 14, 15, 20, 18, 7, 10, 9, 12, 16, 5, 6, 8, 3, 4, 2, 1, 30, 22, 30, 33, 35, 15, 22, 21 (列表图表参考历史文本内部格式)
抵消
1,2
链接
M.Abramowitz和I.A.Stegun编辑。,数学函数手册,国家标准局,应用数学。系列55,第十次印刷,1972年[替代扫描副本]。
配方奶粉
T(n,k)=产品{p=1。。A036043型(n,k)}A000041号(c) ,1<=k<=A000041号(n) ,其中c是n的第k分区中的部分-R.J.马塔尔2013年7月12日
例子
1;
2, 1;
3, 2, 1;
5, 3, 4, 2, 1;
7, 5, 6, 3, 4, 2, 1;
T(5,2)=5,因为5的第二个分区是1+4,4可以用5种不同的方式重新分区。
T(5,3)=6,因为5的第三个分区是2+3,其中2可以用2种方式(2,1+1)进行分区,3可以用3种方式(3,1+2,1+1+1)进行划分,6=2*3。
T(5,4)=3,因为5的第四个分区是1+1+3,3可以用3种不同的方式进行分区。
MAPLE公司
#按AS顺序比较两个分区(列表)。
A比较:=进程(p1,p2)
如果nops(p1)>nops(p2),则
返回1;
elif nops(p1)<nops(p2)则
返回-1;
其他的
对于i从1到nops(p1)do
如果op(i,p1)>op(i、p2),则
返回1;
elif op(i,p1)<op(i、p2)then
返回-1;
结束条件:;
结束do:
返回0;
结束条件:;
结束进程:
#按AS顺序生成分区列表
ASPrts:=进程(n)
局部pi,insrt,p,ex;
pi:=[];
对于组合[分区](n)do中的p
插入:=0;
对于ex从1到nops(pi)do
如果AScompare(p,op(ex,pi))>0,则
插入:=ex;
结束条件:;
结束do:
如果nops(pi)=0,则
pi:=[p];
elif insrt=0,则
pi:=[p,op(pi)];
elif insrt=nops(pi)那么
pi:=[op(pi),p];
其他的
pi:=[op(1..insrt,pi),p,op(insrt+1..nops(pi))];
结束条件:;
结束do:
返回pi;
结束进程:
A119441号:=进程(n,k)
局部pi,a,p;
pi:=ASPrts(n)[k];
a:=1;
对于πdo中的p
a:=a*组合[numbpart](p);
结束do:
a;
结束进程:
对于n,从1到10 do
对于从1到的kA000041号(n) 做
printf(“%d,”,A119441号(n,k));
结束do:
printf(“\n”);
结束do:#R.J.马塔尔2013年7月12日
交叉参考
囊性纤维变性。A063834号,A119442号,A000041号(行长度和第一列)
关键词
容易的,非n,标签
作者
阿尔福德·阿诺德2006年5月19日
状态
经核准的

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

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

上次修改时间:2024年4月19日16:08 EDT。包含371794个序列。(在oeis4上运行。)