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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A214197型 “第二类”底漆。 2
2, 3, 5, 7, 11, 19, 23, 47, 59, 61, 71, 101, 113, 223, 487, 661, 719, 811, 947, 1327, 1621, 2039, 2161, 2377, 2381, 2699, 2957, 3011, 3607, 3727, 4093, 4549, 4649, 5939, 6473, 8363, 9601 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
评论
有关精确定义,请参见Sun 2012。这一术语过于繁琐,最好在这里包括一个更精确的定义。
与的差异2016年2月14日:“primarial”产品总和(A002110号)这里使用的是,而不是差异-Jean-François Alcover公司,2018年1月20日
链接
孙志伟,关于只取素值的函数,arXiv预印arXiv:1202.65892012;见第5页。
数学
primorial[n_]:=primorial[n]=乘积[素数[i],{i,1,n}];
p[0]=1;p[n_]:=p[n]=模块[{m,i,j,ddvs},对于[m=2,True,m++,ddvs=False;对于[i=1,i<=n-1,i++,对于[j=i+1,j<=n,j++,如果[Mod[primorial[j]+primorial[i],m]=0,ddvs=True;中断[]]];如果[ddvs,中断[]]];如果[ddvs==False,则返回[m]]];
A214197型=收获[n=k=1;当[n<=400时,如果[p[n]!=p[n-1],a[k]=p[n];打印[n,“a(”,k,“)=”,a[k]];母猪[a[k]];k++];n++]][[2,1]](*Jean-François Alcover公司2018年1月20日之后R.J.马塔尔*)
交叉参考
囊性纤维变性。A214196型.
关键词
非n,更多
作者
N.J.A.斯隆,2012年7月7日
扩展
a(21)-a(37)来自Jean-François Alcover公司,2018年1月20日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月21日15:38。包含373555个序列。(在oeis4上运行。)