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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A071830号 最小k>n,使得Lpf(n)=Lpf(k),其中Lpf(x)表示x因子分解中的最大素因子。
4, 6, 8, 10, 9, 14, 16, 12, 15, 22, 18, 26, 21, 20, 32, 34, 24, 38, 25, 28, 33, 46, 27, 30, 39, 36, 35, 58, 40, 62, 64, 44, 51, 42, 48, 74, 57, 52, 45, 82, 49, 86, 55, 50, 69, 94, 54, 56, 60, 68, 65, 106, 72, 66, 63, 76, 87, 118, 75, 122, 93, 70, 128, 78, 77, 134, 85, 92 (列表图表参考历史文本内部格式)
抵消
2,1
评论
发件人雷米·西格里斯特,2017年6月3日:(开始)
这个序列是合成数的排列(A002808号).
对于任何素数p,a(p)=2*p。
对于任意n>0,a(2^k)=2^(k+1)。
对于任何素数p和n>=0,a^n(p)/p是(n+1)-第p-光滑数(其中a^n表示a的第n次迭代)。
对于任意n>1,a(n)<=2*n(Lpf(2*n)=Lpf)。
另请参阅A287932型对于最小素因子当量。
(结束)
链接
雷米·西格里斯特,n,a(n)表,n=2.10000
数学
数组[Which[PrimeQ[#],2#,IntegerQ@Log2[#]、2^(IntegerExponent[#,2]+1),True,If[#1<=#2^2,(#1/#2+1)#2,Block[{k=#1/#2+1},While[FactorInteger[k][[-1,1]>#2,k+];k#2]]&@{#,因子整数[#][[-1,1]]}]&[#]&,68,2](*迈克尔·德弗利格,2021年11月3日*)
Lpf[x_]:=因子整数[x][-1,1]];数组[(k=#;While[Lpf@#!=Lpf@++k];k)&,68,2](*乔戈斯·卡洛格罗普洛斯2021年11月3日*)
黄体脂酮素
(PARI)适用于(n=2120,s=+1);而(abs(成分(成分(因子(n),1),ω(n))-成分(成分)(因子(n+s),1,ω))>0,s++);打印1(n+s,“,”)
(PARI)a(n)={my(f=因子(n)[,1],h=f[#f],s=n\h);对于(i=s+1,oo,c=因子(i)[,2];如果(c[#c]<=h,返回(i*h))}\\大卫·A·科内斯2021年11月3日
交叉参考
囊性纤维变性。A002808号,A006530号,A287932型.
关键词
非n,容易的
作者
Benoit Cloitre公司2002年6月8日
状态
经核准的

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

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

上次修改时间:2024年4月20日00:26 EDT。包含371798个序列。(在oeis4上运行。)