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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A280028型 a(1)=1;然后,如果n为偶数,a(n)=a(n-1)-st素数,如果n是奇数,a。 4
1, 2, 4, 7, 12, 37, 52, 239, 301, 1993, 2338, 20753, 23356, 266587, 291968, 4134187, 4446630, 75947059, 80652283, 1625456353, 1710094788, 39954587527, 41737658509, 1114336791787, 1157634258442, 34900173534517, 36096139358620, 1216553712004063 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
这是中提到的序列S_1A141436号素数和非素数交替出现。
链接
MAPLE公司
P: =n->ithprime(n);
#设b1是非素数列表(来自A018252号)
N: =N->如果N<=nops(b1),则b1[N]否则为0;fi;;
f: =proc(m)局部S,n,sw,t;全局P,N;
S: =[m];t: =米;
如果isprime(m),则sw:=1;其他sw:=2;fi;
如果sw=1,则
对于从2到60 do的n
如果n mod 2=0,则t:=n(t);如果t=0,则返回(S);fi;否则t:=P(t);fi;S: =[op(S),t];
日期:
其他的
对于2到60 do的n
如果n mod 2=0,则t:=P(t);否则t:=N(t);如果t=0,则返回(S);fi;fi;S: =[op(S),t];
日期:
fi;
S;
结束;
f(1)#A280028型
f(3)#A280029型
f(5)#A280030型
数学
非素数[n_Integer]:=固定点[n+PrimePi@#&,n+PrimPi@n];a[n_]:=如果[OddQ@n,nonPrime[a[n-1]],素数@a【n-1】;a[1]=1;数组[a,26](*罗伯特·威尔逊v2016年12月28日*)
交叉参考
关键字
非n
作者
N.J.A.斯隆2016年12月25日
扩展
a(13)-a(27)来自汉斯·哈弗曼2016年12月25日
a(28)来自柴华武2016年12月26日
状态
经核准的

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

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

上次修改时间:2024年4月24日13:41 EDT。包含371957个序列。(在oeis4上运行。)