%I#18 2022年6月24日17:21:07
%S 0,5,0,9,5,4,8,4,5,9,4,6,2,7,6,8,9,7,6,14,5,10,5,1,7,3,4,3,5,
%温度5,0,6,5,8,5,13,4,5,5,3,8,4,4,5,8,3,6,1,4,2,5,2,3,4,1,9,8,7,4,7,3,
%U 3,5,5,7,8,4,3,3,2,1,7,0,4,2,5,3,7,9,6,6,5,6,8
%N从第N个素数开始,通过在最小的非零数字前面加上前缀,可以连续形成一个新素数的次数。
%C所描述的过程可能会生成一些左旋素数(A024785)。虽然零位数不能相加,但起始质数可能包含零。因此,数字加法的可能数量不受已知最大左可截断素数长度的限制。此外,由于每次使用满足要求的最小数字,因此选择较大的数字可能会允许添加更多的单个数字。因此,尽管这种做法可能会产生一些左可调素数集,但并非所有的都会产生。
%原则上,有些a(n)可能是未定义的,因为这个过程可能无限期地进行,但这是不太可能的。n≤300000的最大a(n)是a(49120)=18_罗伯特·伊斯雷尔(Robert Israel),2015年6月29日
%H Robert Israel,n的表,a(n)表示n=1..10000</a>
%H.I.O.Angell和H.J.Godwin,<a href=“http://dx.doi.org/10.1090/S0025-5718-1977-0427213-2“>关于可截断素数,数学计算,31265-2671977。
%H<a href=“/index/Tri#tprime”>与可截断素数相关的序列的索引项</a>
%e a(2)是5,因为第二个素数是3,单个非零数字可以加5次,每次产生一个新素数(优先考虑满足要求的最小数字):13,113,2113,12113,612113(参见A053583)。没有非零数字可以加在612113之前生成新素数。
%e a(21)=14,因为第21个素数(73)可以加上单个非零数字14次,每次产生一个新素数:73,173,6173,66173。。。,4818372912366173
%p f:=proc(n)局部p,nd,d,count,x,success;
%p p:=i素数(n);nd:=ilog10(p);
%p表示从0到do的计数
%p nd:=nd+1;
%p成功:=假;
%p代表d从1到9 do
%px:=10^nd*d+p;
%p如果是素数(x),则
%p成功:=真;
%p中断
%功率因数
%p od;
%p如果不成功,则返回(计数)fi;
%p p:=x;
%日期
%p端程序:
%p映射(f,[1..100]美元);#_罗伯特·伊斯雷尔(Robert Israel),2015年6月29日
%o(Python)
%o从sympy导入isprime,prime
%o定义a(n):
%o pn=素数(n)
%o s,c,找到=str(pn),0,真
%o找到时:
%o发现=错误
%o代表“123456789”中的d:
%o如果isprime(int(d+s)):
%o s,c,发现=d+s,c+1,真
%o中断
%o返回c
%o打印([a(n)代表范围(191)中的n)]#_Michael S.Branicky_,2022年6月24日
%Y参见A053583、A024785、A000040、A101116、A101117、A101118。
%K基,nonn
%O 1,2号机组
%A Chuck Seggelin(seqfan(AT)plasteddragon.com),2004年12月2日
|