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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A211110型 将n划分为n的除数>1的除数的次数。 14
1、0、1、1、2、1、3、1、4、2、3、1、12、1、3、3、10、1、15、1、16、3、3、1、80、2、3、5、20、1、94、1、36、3、3、3、280、1、3、3、158、1、154、1、28、25、3、1、1076、2、29、3、32、1、255、3、262、3、3、1、7026、1、3、32、202、3、321、1、40、3、302、1、12072,1个 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,5
评论
一个(A000040型(n) )=1;一个(A002808号(n) )>1;
一个(A001248号(n) )=2;一个(A080257号(n) )>2;
一个(A006881号(n) )=3;一个(A033942号(n) )>3。
链接
阿洛伊斯·海因茨,n=0..10000时的n,a(n)表
例子
a(10)={10,5+5,2+2+2+2}=3;
a(11)={11}=1;
a(12)={12、6+6、6+4+2、6+3+3、6+2+2、4+4+4、4+2+2,4+3+3+2、4+2+2+2和3+3+3,3+3+2+2,6x2}=12;
a(13)={13}=1;
a(14)={14,7+7,2+2+2+2+2}=3;
a(15)={15,5+5+5,3+3+3+3+3}=3。
MAPLE公司
带有(数字理论):
a: =proc(n)局部b,l;l: =排序([(除数(n)减去{1})[]]):
b: =proc(m,i)选项记忆`如果`(m=0,1,`如果`(i<1,0,
b(m,i-1)+`if`(l[i]>m,0,b(m-l[i],i))
结束;忘记(b):
b(n,nops(l))
结束时间:
seq(a(n),n=0..100)#阿洛伊斯·海因茨2014年2月5日
数学
a[n_]:=模[{b,l},l=静止[Divisors[n]];b[m_,i_]:=b[m,i]=如果[m==0,1,如果[i<1,0,b[m、i-1]+如果[l[i]]>m,0,b[m-l[i],i]]];b[n,长度[l]]];a[0]=1;表[a[n],{n,0,100}](*Jean-François Alcover公司,2015年6月30日,之后阿洛伊斯·海因茨*)
程序
(哈斯克尔)
a211110 n=p(尾部$a027750_row n)n,其中
p _ 0=1
p[]_=0
p ks’@(k:ks)m|m<k=0
|否则=p ks'(m-k)+p ks m
(PARI)isokp(p,n)={对于(k=1,#p,如果(p[k]==1)||(n%p[k]),返回(0););返回(1);}
a(n)={my(nb=0);对于部分(p=n,if(isokp(p,n),nb++));nb;}\\米歇尔·马库斯2015年6月30日
交叉参考
囊性纤维变性。A211111型,A018818号,A027750型.
囊性纤维变性。A210442型.
关键词
非n
作者
状态
已批准

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

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

上次修改时间:2024年4月25日01:35 EDT。包含371964个序列。(在oeis4上运行。)