|
|
A196994号 |
| 编号n,使sopfr(n-1)|=2014年0月14日(素因子与重复的总和)。 |
|
1
|
|
|
9024, 12499, 18024, 24744, 31303, 51358, 74004, 88928, 119664, 127040, 144156, 147014, 161162, 161703, 221075, 224433, 256920, 376704, 475259, 509937, 519960, 520404, 521873, 579501, 606360, 662304, 693252, 809184, 813247, 817453, 1110110, 1545335, 1681760
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
即使对此类n的数量没有限制,也不容易找到它们。(1000)^k和k=1,2,3…的频率是多少。。。?奇偶数在数量上相等吗?素数会发生吗?
|
|
链接
|
|
|
例子
|
对于n=74004,sopfr(74004-1)=43+1721=1764,sopfr(17004+1)=5+19+19+41=84,将1764除以74004+84得到商42,将84除以74004+1764得到商902。
|
|
MAPLE公司
|
sopfr:=n->添加(i[1]*i[2],i=ifactors(n)[2]):
a: =proc(n)选项记忆;局部k;
对于来自1+`if`(n=1,2,a(n-1))的k
而irem(k+sopfr(k+1),sopfr(k-1))<>0
或irem(k+sopfr(k-1),sopfr
做od;k个
结束时间:
|
|
数学
|
sopfr[n_]:=总计[Times@@@FactorInteger[n]];a[n_]:=a[n]=模[{k},对于[k=1+如果[n==1,2,a[n-1]],Mod[k+sopfr[k+1],sopfr[k-1]]!=0||修改[k+sopfr[k-1],sopfr[k+1]]!=0,k++];k] ;表[a[n],{n,1,10}](*Jean-François Alcover公司2015年5月29日,之后阿洛伊斯·海因茨*)
|
|
交叉参考
|
|
|
关键词
|
非n,坚硬的
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|