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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A285483型 a(n)是构成a(n”)的最小正整数*A007694号(n) -1是质数,而a(n)和A007694号(n) 是互质。 2
7, 1, 1, 1, 1, 5, 1, 1, 1, 5, 1, 1, 17, 1, 5, 1, 1, 5, 5, 1, 7, 5, 5, 5, 1, 1, 13, 7, 5, 1, 11, 1, 1, 5, 1, 17, 19, 17, 19, 5, 25, 5, 1, 7, 5, 13, 11, 5, 1, 5, 5, 7, 1, 1, 19, 1, 1, 17, 5, 7, 29, 1, 5, 1, 5, 7, 7, 17, 1, 7, 7, 1, 7, 49, 5, 13, 13, 25, 5, 5, 23 (列表;图表;参考;;历史;文本;内部格式)
抵消
2,1
评论
所有术语都是A007310号,不含素因子2和3,因为如果a(n)的因子为2,2*A007694号(n) 也是A007694号同上,a(n)可被3种情况整除。
a(1)没有定义,因为任何大于3减1的奇数都是偶数非素数。
链接
例子
对于n=2,A007694号(2) =2,测试集合{1,5,7,11,13,17,19…}中k的k*2-1,我们发现7*2-1=13是发现的第一个素数。所以a(2)=7;
以类似的方式,1*A007694号(3) -1=1*4-1=3是n=3的第一个质数,因此a(3)=1。
对于n=7,A007694号(7) =16,5*16-1=89是发现的最小素数,因此a(7)=5。
数学
b=2;a={b};sm={};r=a;当[长度[sm]<81时,f=0;
而[f++;(fc=FactorInteger[f];
成员Q[{2,3},fc[[1,1]])||(!素数Q[f*a[[Length[a]]-1])];
附录[sm,f];c=r*2;d=r*3;e=排序[联合[c,d]];i=1;
当[e[i]]<=a[[Length[a]]]时,i++];附加到[a,e[[i]]];
附加到[r,e[[i]]];
当[(3*r[[1]])<r[[Length[r]]]时,r=删除[r,1]]];平方米
交叉参考
囊性纤维变性。A003586号,A007310号,A007694号.
关键词
非n,容易的
作者
雷舟(Lei Zhou)2017年4月19日
状态
经核准的

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

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

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