A124830-OEIS公司

A124830号

不同素因子的数量A055932号（n） ●●●●。

三

0, 1, 1, 2, 1, 2, 1, 2, 2, 3, 1, 2, 2, 2, 3, 1, 2, 3, 2, 2, 3, 1, 2, 3, 2, 3, 2, 4, 2, 3, 1, 3, 2, 3, 2, 3, 2, 4, 2, 3, 3, 2, 1, 3, 2, 3, 4, 2, 3, 3, 2, 3, 4, 2, 3, 3, 2, 1, 4, 3, 2, 3, 4, 2, 3, 3, 2, 4, 3, 2, 3, 4, 2, 3, 4, 3, 2, 1, 4, 3, 3, 2, 5, 3, 3, 4, 2, 3, 3, 2, 4, 3, 2, 4, 3, 4, 2, 3, 3, 4, 3, 2, 3, 1, 4

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1,4

链接

迈克尔·德弗利格，n=1..10000时的n，a（n）表（前1000个术语来自G.C.Greubel。）

配方奶粉

a（n）=A001221号(A055932号（n））。

数学

PrimeNu/@Select[范围[4000]！MemberQ[Function[f，ReplacePart[Table[0，{PrimePi[f[[-1，1]]}]，#]&@Map[PrimePi@First@#->Last@#&，f]]@FactorInteger@#，0]&](*迈克尔·德弗利格2017年2月2日*）

A055932号[n_]：=模块[｛f=换位[FactorInteger[n]][[1]]｝，f=｛1｝| | f=Prime[范围[Length[f]]]；PrimeNu[选择[范围[2000]，A055932号]] (*G.C.格鲁贝尔2017年5月11日*）

黄体脂酮素

（Python）

从sympy导入nextprime，primefactors

定义a053669（n）：

p=2

为True时：

如果n%p=0：返回p

其他：p=下一个prime（p）

def ok（n）：如果n==1，则返回True，否则a053669（n）>max（素数（n））

打印（[len（primefactors（n））for n in range（110001）if ok（n）]）#印地瑞尼Ghosh2017年5月11日

交叉参考