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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A351495型 a(1)=1,对于n>1,a(n)是尚未出现的最小正数,是不除a(n-1)的最小素数的倍数。 23
1, 2, 3, 4, 6, 5, 8, 9, 10, 12, 15, 14, 18, 20, 21, 16, 24, 25, 22, 27, 26, 30, 7, 28, 33, 32, 36, 35, 34, 39, 38, 42, 40, 45, 44, 48, 50, 51, 46, 54, 55, 52, 57, 56, 60, 49, 58, 63, 62, 66, 65, 64, 69, 68, 72, 70, 75, 74, 78, 80, 81, 76, 84, 85, 82, 87, 86, 90, 77, 88, 93, 92, 96, 95, 94 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
序列被推测为正整数的置换。
第k个素数出现在A002110号(k-1)出现。
链接
迈克尔·德弗利格,n,a(n)表,n=1.10000
迈克尔·德弗利格,a(n)的对数散点图,n=1..2^16,显示m,其中lpf(m)=7为红色,lpf(m)=11为金色,lpf。
Scott R.Shannon,前50000个术语的图像.绿线为y=n。
例子
a(5)=6作为不包含3作为质因子的(4)=2=2*2,并且6是最小的未使用数,是3的倍数。
a(6)=5表示a(5)=6=2*3,其中不包含5作为素因子,5是5的倍数的最小未使用数。
数学
nn=75;c[_]=0;a[1]=c[1]=1;u=2;Do[q=2;While[!互质q[q,a[i-1]],Set[q,NextPrime[q]]];m=天花板[u/q];而[c[m*q]!=0,m++];集合[{a[i],c[m*q]},{m*q,i}];如果[m*q==u,而[c[u]>0,u++]],{i,2,nn}];数组[a,nn](*迈克尔·德弗利格2022年5月3日*)
黄体脂酮素
(Python)
从itertools导入计数,islice
从sympy导入prime,primepi,primefactors
定义A351495型_gen():#术语生成器
集合,cset=set(),{1}
产量1
为True时:
对于计数(1)中的i:
如果不是,则在集合中:
p=素数(i)
对于计数(1)中的j:
如果(m:=j*p)不在cset中:
产量m
cset.add(m)
打破
打破
aset=集合(映射(素数,素数因子(m)))
A351495型_list=列表(岛屿(A351495型_发电机(),30))#柴华武2023年3月18日
交叉参考
另请参阅A361330型,A361331型.
关键词
非n
作者
斯科特·R·香农2022年5月3日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月16日14:12。包含373430个序列。(在oeis4上运行。)