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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A242065型 最小的k使得{A242059号(i) :1<=i<=k}和{2012年2月60日(i) :1<=i<=k}包括所有素数{5,…,素数(n)}。 2
2, 3, 4, 8, 8, 17, 17, 17, 60, 60, 60, 60, 60, 60, 60, 60, 60, 60, 179, 179, 179, 179, 179, 179, 179, 179, 264, 264, 264, 319, 319, 319, 319, 365, 1112, 1112, 1112, 1112, 1112, 1112, 1112, 1112, 1112, 1112, 1112, 4372, 4372, 4372, 4372, 4372, 15504, 15504 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
3,1
链接
数学
lpf[n_]:=lpf[n]=第一个[First[FactorInteger[n]]];(*最小素因子*)
lpf3[n]:=lpf3[n]=如果[#==1,1,lpf[#]]&[n/3^整数指数[n,3]];
A242059号=地图[lpf3[#-1]&,选择[Range[4,100000,2],lpf3[#-1]<lpf3[#-3]&](*A242057号*)];
A242060型=地图[lpf3[#-3]&,选择[Range[4,100000,2],lpf3[#-1]>lpf3[#-3]&](*A242058型*)];
pos={};NestWhile[#+1&,3,(附加到[pos,最小[Position[A242059号,素数[#],1,1],位置[A242060型,素数[#],1,1]/。{}->0]]; !最后一个[pos]==0)&];
A242065型=休息[FoldList[Max,-Infinity,Flatten[pos]]](*彼得·J·C·摩西2014年8月14日*)
交叉参考
关键字
非n
作者
扩展
更多术语来自彼得·J·C·摩西2014年8月14日
状态
经核准的

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

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

上次修改时间:2024年4月24日05:49 EDT。包含371918个序列。(在oeis4上运行。)