登录
搜索: 编号:a180625
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
a(1)=2;a(n)是前一项的两倍,如果它是质数,否则前一项减去其最低质数因子加一。
+0
1
2, 4, 3, 6, 5, 10, 9, 7, 14, 13, 26, 25, 21, 19, 38, 37, 74, 73, 146, 145, 141, 139, 278, 277, 554, 553, 547, 1094, 1093, 2186, 2185, 2181, 2179, 4358, 4357, 8714, 8713, 17426, 17425, 17421, 17419, 34838, 34837, 34827
抵消
1,1
链接
例子
2是质数;2 * 2 = 4. 4为复合型;4-lpf(4)+1=4-2+1=3。3是质数;3 * 2 = 6. 6为复合型;6-lpf(6)+1=6-2+1=5。
数学
联接[{s=2},表[If[PrimeQ[s],s=2s,s=s-FactorInteger[s][[1,1]]+1];s、 {43}]]
NestList[If[PrimeQ[#],2#,#-FactorInteger[#][[1,1]]+1]&,2,50](*哈维·P·戴尔,2012年5月2日*)
交叉参考
囊性纤维变性。A020639号.
关键词
非n
作者
格兰特·加西亚2011年1月21日
状态
经核准的

搜索在0.005秒内完成