登录
A187878号
数字k,使sopfr(k+omega(k))=sopfr=A001414号(i) 和ω(i)=A001221号(i) ●●●●。
2
5, 8, 10, 125, 231, 250, 470, 1846, 2844, 2856, 3570, 5126, 5320, 7473, 8687, 12555, 12573, 16740, 16764, 17877, 18630, 20601, 21620, 22011, 24823, 27468, 28861, 31941, 33120, 37053, 42315, 42588, 43761, 49404, 58078, 61072, 67728, 68320, 75042, 79947, 84660, 86427, 92432, 97723, 98802, 99580
抵消
1,1
链接
乔瓦尼·雷斯塔,n=1..10000时的n,a(n)表
安东尼奥·罗尔丹,hojaynumeros.blogspot.com.
埃里克·魏斯坦的数学世界,主要因素.
埃里克·魏斯坦的数学世界,基本因子之和.
维基百科,加法函数.
例子
欧米茄(5126)=3,(5126=2*11*233),5126+3=5129,sopfr(5126)=2+11+233=246,
5129=23*223,sopfr(5129)=2+223=246
数学
ω[n_]:=如果[n<2,0,长度[FactorInteger[n]]];sopfr[n_]:=模[{p,e},如果[n<2,1,{p,e}=转置[FactorInteger[n]];总计[p*e]]];选择[Range[2,100000],sopfr[#]==sopfr[#+omega[#]]&](*T.D.诺伊2011年3月14日*)
黄体脂酮素
(PARI)sopfr(n)={局部(f,s=0);f=因子(n);对于(i=1,矩阵大小(f)[1],s+=f[i,1]*f[i、2]);返回}
{对于(n=1,10^6,如果(sopfr(n)==sopfr(n+omega(n)),打印1(n,“,”));}
/*安东尼奥·罗尔丹2012年10月23日*/
交叉参考
囊性纤维变性。A001221号(Ω),A001414号(sopfr:整数对数),A187877号.
关键词
非n
作者
安东尼奥·罗尔丹2011年3月14日
扩展
由扩展T.D.诺伊2011年3月14日
状态
经核准的