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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A088686号 如果sopfr(素数)为0,则记录在时间和函数sopfr函数(n)中的位置。
1, 4, 6, 8, 10, 14, 21, 22, 26, 34, 38, 46, 58, 62, 74, 82, 86, 94, 106, 118, 122, 134, 142, 146, 158, 166, 178, 194, 202, 206, 214, 218, 226, 254, 262, 274, 278, 298, 302, 314, 326, 334, 346, 358, 362, 382, 386, 394, 398, 422, 446, 454, 458, 466, 478, 482 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,2
链接
因德拉尼尔·戈什,n=1..2765时的n,a(n)表(期限<50000)
埃里克·魏斯坦的数学世界,基本因子之和
数学
函数[s,Map[FirstPosition[s,#][[1]]&,Union@FoldList[Max,s]]@Table[Total@Flatten@Map[ConstantArray[#1,#2]/。1->0&@@#&,FactorInteger@n]-n布尔[PrimeQ@n],{n,500}](*迈克尔·德弗利格2017年6月29日*)
黄体脂酮素
(PARI)sopfr(k)=我的(f=系数(k));求和(j=1,#f~,f[j,1]*f[j、2]);
lista(nn)={my(record=-1);对于(n=1,nn,if(!isprime(n),if((x=sopfr(n))>record,record=x;print1(n,“,”);););}\\米歇尔·马库斯2017年6月29日
(Python)
从sympy导入因子,isprime
定义sopfr(n):
f=因子(n)
返回和(f中i的[i*f[i])
l=[]
记录=-1
对于范围(1501)内的n:
如果不是质数(n):
x=sopfr(n)
如果x>记录:
记录=x
l.附录(n)
打印(l)#印地瑞尼Ghosh2017年6月29日
交叉参考
囊性纤维变性。A001414号,A088685号.
关键字
非n
作者
埃里克·韦斯特因2003年10月5日
状态
经核准的

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

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

上次修改时间:2024年4月23日22:36 EDT。包含371917个序列。(在oeis4上运行。)