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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A329309型 a(n)是第一素数p,这样A329308型(p) =个。 2
2, 7, 11, 23, 43, 67, 83, 173, 167, 227, 367, 331, 503, 607, 727, 827, 1031, 1447, 1223, 1163, 1523, 1973, 2957, 2357, 1811, 3083, 3631, 3607, 4423, 5419, 6779, 5297, 6353, 7207, 7307, 7817, 9803, 6563, 8861, 8123, 10223, 10883, 13331, 10853, 14423, 14419, 17597, 15307, 15083, 15889, 21227, 19403 (列表;图表;参考;;历史;文本;内部格式)
抵消

0,1

链接

罗伯特·伊斯雷尔,n=0..325时的n、a(n)表

例子

a(3)=23,因为A329308型(23)=3,23是具有这个性质的最小素数。

MAPLE公司

f: =程序(n)局部k;nops(选择(isprime,[seq(n mod k^2,k=2..floor(sqrt(n))))结束进程:

五: =数组(0..100):计数:=0:p:=0:

当计数<101 do时

p: =下一素数(p);

v: =f(p);

如果v<=100且v[v]=0,则

计数:=计数+1;V[V]:=p;

fi(菲涅耳)

日期:

转换(V,列表);

数学

b[n]:=b[n]=(*A329309型*)选择[Range[2,Sqrt[n]//Floor],PrimeQ[Mod[n,#^2]]&]//长度;

a[n_]:=对于[p=2,True,p=NextPrime[p],如果[b[p]==n,打印[n,“,p];返回[p]]];

a/@范围[0100](*Jean-François Alcover公司2020年8月22日*)

黄体脂酮素

(岩浆)a:=[];对于[0..50]中的n,做p:=2;而#[k:k in[2..Floor(Sqrt(p))]|IsPrime(p mod k^2)]ne n do p:=下一个Prime(p);结束while;追加(~a,p);结束;a//马吕斯·A·伯蒂2019年11月11日

交叉参考

囊性纤维变性。A329308型.

上下文中的序列:A184799号 A045374号 A168032号*A217304型 A179876号 A088179号

相邻序列:A329306型 A329307型 A329308型*A329310型 A329311型 A329312型

关键词

非n

作者

J.M.贝戈罗伯特·伊斯雷尔2019年11月9日

状态

经核准的

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

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

上次修改时间:美国东部标准时间2023年2月8日08:32。包含360136个序列。(在oeis4上运行。)