|
|
098743加元 |
| 将n划分为等分部分(即不划分n的部分)的数量。 |
|
31
|
|
|
1, 0, 0, 0, 0, 1, 0, 3, 1, 3, 3, 13, 1, 23, 10, 11, 9, 65, 8, 104, 14, 56, 66, 252, 10, 245, 147, 206, 77, 846, 35, 1237, 166, 649, 634, 1078, 60, 3659, 1244, 1850, 236, 7244, 299, 10086, 1228, 1858, 4421, 19195, 243, 17660, 3244, 12268, 4039, 48341, 1819, 27675
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
抵消
|
0,8
|
|
评论
|
|
|
链接
|
|
|
例子
|
7=2+2+3=2+5=3+4,因此a(7)=3。
a(10)={7+3,6+4,4+3+3}=3,10的所有其他分区都包含至少一个除数(10、5、2或1)。
|
|
MAPLE公司
|
a:=[1,0,0,0,0];M: =300;对于从5到M的n,做t1:={seq(i,i=1..n)};t3:=t1减去除数(n);t4:=mul(1/(1-x^i),i在t3中);t5:=系列(t4,x,n+2);a: =[op(a),系数(t5,x,n)];od:a#N.J.A.斯隆2015年8月8日
#第二个Maple项目:
a: =proc(m)选项记忆;局部b;b: =程序(n,i)
选项记忆`如果`(n=0,1,`如果`(i<2,0,b(n,i-1)+
`如果`(irem(m,i)=0,0,b(n-i,min(i,n-i))))结束;b(百万美元)
结束时间:
|
|
数学
|
a[m_]:=a[m]=模[{b},b[n_,i_]:=b[n,i]=如果[n==0,1,如果[i<2,0,b[n、i-1]+如果[Mod[m,i]==0、0、b[n-i,Min[i,n-i]]];b[m,m]];
|
|
黄体脂酮素
|
(哈斯克尔)
a098743 n=p[nd|nd<-[1..n],mod n nd/=0]n,其中
p _ 0=1
p[]_=0
p ks’@(k:ks)m|m<k=0|否则=p ks’(m-k)+p ks m
(哈斯克尔)--带记忆
导入数据。MemoCombinators(memo3,整数)
a098743 n=a098743_列表!!n个
a098743_list=地图(\x->pMemo x 1 x)[0..]其中
pMemo=memo3积分积分p
p _ _ 0=1
p x k m | m<k=0
|mod x k==0=pMemo x(k+1)m
|否则=pMemo x k(m-k)+pMemo x(k+1)m
(PARI)a(n)={polcoef(1/prod(k=1,n,if(n%k,1-x^k,1)+O(x*x^n)),n)}\\安德鲁·霍罗伊德2018年8月29日
|
|
交叉参考
|
|
|
关键字
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|