OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A347757型 中局部极小值的指数A347113型.
1, 8, 11, 20, 28, 37, 51, 53, 101, 116, 136, 146, 159, 213, 302, 318, 440, 520, 638, 698, 702, 912, 1031, 1128, 1528, 1758, 1832, 1891, 2107, 2198, 2523, 2671, 2857, 3069, 3760, 3892, 3946, 4256, 4438, 4638, 4880, 5022, 5656, 6092, 6147, 6322, 6470, 6492, 6579 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
a(n)-1=的最后一个实例A347756型(n) 在A347755型.
a(n+1)>a(n)+1,因为A347113型定义不同。
链接
柴华武,n=1..6904时的n,a(n)表(Michael De Vlieger第1..898条)
数学
块[{nn=2^13,a={1},c,k,m,u=2,v},v=a;映射[Set[c[#],1]&,Union@a];执行[设置[k,u];如果[PrimeQ[#],m=2;而[IntegerQ[c[m#]],m++];k=m#,而[Or[IntegerQ[c[k]],k==#,GCD[k,#]==1],k++]]&[a[[-1]]+1];附加到[a,k];集合[c[k],1];附加到[v,u];如果[k==u,而[IntegerQ[c[u]],u++]],nn];地图[FirstPosition[a,#][[1]]&,Most@Union@v]]
(*或使用A347113型b文件:*)
块[{a,u={1},v=1},a=Import[“网址:https://oeis.org/A347113型/b347113.txt“,”数据“][[All,-1]];Do[If[a[[i]]==v,While[!FreeQ[a[[1;;i]],v],v++]];AppendTo[u,v],{i,Length[a]}];Map[FirstPosition[a,#][[1]]&,Most@Union@u]]
黄体脂酮素
(Python)
从数学导入gcd
A347757型_列表,nset,m,j,i=[1],{1},2,2,1
对于范围内的_(10**4):
i+=1
k=米
而k==j或gcd(k,j)==1或以nset表示的k:
k+=1
j=k+1
插入加法(k)
如果k==m:
A347757型_列表.附加(i)
当m在nset中时:
m+=1#柴华武2021年9月13日
交叉参考
囊性纤维变性。A347113型,A347306型(中的记录索引A347113型),A347755型,A347756型.
关键词
非n
作者
迈克尔·德弗利格2021年9月12日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年5月29日00:29。包含372921个序列。(在oeis4上运行。)