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

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: a079432-编号:a079433
显示1-1个结果(共1个)。 第页1
    排序:关联|参考文献||被改进的|已创建     格式:长的|短的|数据
A079431号 与n具有相同最小奇数素数因子的最小m>n。 +10
2
2, 4, 6, 8, 10, 9, 14, 16, 12, 20, 22, 15, 26, 28, 18, 32, 34, 21, 38, 25, 24, 44, 46, 27, 35, 52, 30, 49, 58, 33, 62, 64, 36, 68, 40, 39, 74, 76, 42, 50, 82, 45, 86, 88, 48, 92, 94, 51, 56, 55, 54, 104, 106, 57, 65, 77, 60, 116, 118, 63, 122, 124, 66, 128, 70, 69, 134, 136 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,1
评论
A078701型(a(n))=A078701(n) ,A078701型(i) <>A078701型(n) ,n<i<a(n);
n个+A078701型(n) <=a(n)<=2*n;
a(2^k)=2^(k+1),作为A078701型(2^k)=1。
链接
罗伯特·伊斯雷尔,n=1..10000时的n,a(n)表
MAPLE公司
N: =100:
A: =矢量(N):
p: =2:
p: =下一素数(p);
如果p>N,则打破fi;
R: =选择(k->A[k]=0,[1..N]);
S: =选择(`<=`,R,N/p);
A[p*S]:=向量(p*R[2..1+nops(S)]);
日期:
对于从0到ilog2(N)的k,执行A[2^k]:=2^(k+1)od:
转换(A,列表)#罗伯特·伊斯雷尔2017年10月25日
数学
sopf[n_]:=SelectFirst[FactorInteger[n][All,1]],#>2&];
a[n_]:=对于[p=sopf[n];m=n+1,真,m++,如果[p==sopf[m],返回[m]]];
数组[a,100](*Jean-François Alcover公司2019年3月9日*)
交叉参考
囊性纤维变性。A079432号(n) =a(a(n))。
囊性纤维变性。A078701型.
关键字
非n,
作者
状态
经核准的
第页1

搜索在0.007秒内完成

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

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

上次修改时间:美国东部夏令时2024年4月24日03:03。包含371917个序列。(在oeis4上运行。)