显示1-1个结果(共1个)。
第页1
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 13, 14, 15, 16, 17, 19, 21, 22, 23, 25, 26, 27, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 41, 42, 43, 46, 47, 49, 51, 53, 55, 57, 58, 59, 61, 62, 64, 65, 66, 67, 69, 70, 71, 73, 74, 77, 78, 79, 81, 82, 83, 85, 86, 87, 89, 91, 93, 94, 95, 97
评论
均匀分区的Heinz数。如果所有部分都以相同的多重性出现,则整数分区是一致的。整数分区的Heinz数(y_1,…,y_k)是素数(y_1)**质数(yk)-古斯·怀斯曼2018年4月16日
数学
选择[Range[100],Length[Union[FactorInteger[#][[All,2]]]==1&](*杰弗里·克雷策2015年3月30日*)
黄体脂酮素
(哈斯克尔)
导入数据。映射(空,findMin,deleteMin,insert)
导入合格数据。地图。Lazy as Map(空)
a072774 n=a072774_列表!!(n-1)
(a072774_list、a072775_list和a072776_list)=解压缩3$
(1,1,1):f(尾部a005117_list)为空,其中
f与'@(v:vs)m
|映射完整m||xx>v=(v,v,1):
f与(插入(v^2)(v,2)m)
|否则=(xx,bx,ex):
f对'(插入(bx×xx)(bx,ex+1)$删除最小值m)
其中(xx,(bx,ex))=findMin m
(Python)
从数学导入isqrt
来自sympy import mobius,integer_nthroot
定义g(x):返回int(范围(1,isqrt(x)+1)中k的总和(mobius(k)*(x//k**2))-1
定义f(x):对于范围(1,x.bit_length())中的k,返回n-2+x-sum(g(integer_nthroot(x,k)[0])
kmin,kmax=1,2
而f(kmax)>=kmax:
kmax≤1
为True时:
kmid=kmax+kmin>>1
如果f(kmid)<kmid:
kmax=kmid
其他:
kmin=kmid
如果kmax-kmin<=1:
打破
交叉参考
囊性纤维变性。A000009号,A000837号,A007916号,A047966美元,A052409号,A052410美元,A072774号,A078374号,A289023型,A289509型,A300486型,A302491型,A302796型,A302979型.
搜索在0.004秒内完成
|