A068999-OEIS公司

A068999号

数k，使k=（k的不同素数因子之和）*（k的独特素数因子的乘积）。

4, 9, 25, 49, 121, 169, 289, 300, 361, 504, 529, 841, 961, 980, 1056, 1369, 1404, 1575, 1681, 1849, 2209, 2600, 2736, 2809, 3481, 3721, 4489, 4851, 5041, 5329, 6241, 6375, 6696, 6889, 7436, 7448, 7695, 7921, 9409, 9639, 10201, 10304, 10609, 11375, 11449

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

抵消

1,1

包含所有素数平方(A001248号).

非素数平方项：300，504，980，1056，1404，1575，2600，2736，4851，6375，6696，7436，7448，7695，9639，10304，11375，11583，12384，13376，13770，14144，19250，20691，21500，22656，24548，24975，28175，28944，30008，34983，36848，37026，50024，58400，63455-亚历克斯·拉图什尼亚克2012年8月17日

链接

阿米拉姆·埃尔达尔，n，a（n）表，n=1.10000

例子

300的素因子是2、3、5，它们的和和和和的乘积分别是10、30，乘以300。因此，300属于该序列。

数学

h[n_]：=模[｛a，l｝，a=因子整数[n]；l=长度[a]；求和[a[[i]][[1]]，{i，1，l}]*乘积[a[i][[1]，{i、1、l}]==n]；选择[Range[2，10^4]，h[#]&]

pf[n_]：=第一个/@FactorInteger[n]；选择[范围[11500]，（加@@pf[#]）*（次数@@pf[#]）==#&](*雷·钱德勒2005年11月14日*）

黄体脂酮素

（Python）

从sympy导入primerange

导入数学

素数=列表（素数范围（210000））

对于范围（110000）内的n：

d=n

总和=0

产品=1

对于素数中的p：

如果d%p==0：

总和+=p

乘积*=p

当d%p==0时：

d//=p

如果d==1：

打破

如果总和*乘积==n：

打印（n，end='，'）

#亚历克斯·拉图什尼亚克2012年8月18日

（Python）

从数学导入prod

从症状导入因子

定义ok（n）：pf=素数（n）；返回n==总和（pf）*prod（pf

打印（列表（过滤器（正常，范围（111600）））#迈克尔·布拉尼基2021年5月15日

交叉参考

囊性纤维变性。A007947号,A008472号.

上下文中的序列：A372743型 A082180号 246131元*179707英镑 A247078型 A077438号

相邻序列：A068996号 A068997号 A068998号*A069000型 A069001型 A069002美元

关键词

非n

作者

约瑟夫·佩伊2002年3月20日

扩展

由扩展雷·钱德勒2005年11月14日

状态

经核准的