%I#24 2019年6月29日02:22:36
%S 9、18、27、28、29、36、45、54、55、56、63、72、82、83、84、85、86、87、88、89、90、99108,
%电话109110117126135136137144153163164166167168169170,
%U 17118018919019119820721621722523424324247248249
%N数N,使得三元表示(A007089)中的N有一个正好由素数连续零组成的块。
%C与Baum-Sweet序列有关,但三元而非二元,素数而非奇数。
%D J.-P.Allouche和J.Shallit,《自动序列》,剑桥大学出版社,2003年,第157页。
%H W.Zane Billings,n表,n=1..10000的a(n)</a>
%H J.-P.Allouche,<a href=“http://www.mat.univie.ac.网址:/~slc/s/s30allouche.html“>有限自动机和算术,séminaire Lotharingien de Combinatoire,B30c(1993),23 pp。
%如果n(基数3)=A007089(n)有一个由连续零组成的素数(A000040)的块(而不是子块),则F a(n)在此序列中。
%e a(1)=9,因为9(以3为基数)=100,它有一个2个零的块。
%e a(2)=18,因为18(基数3)=200,它有一个2个零的块。
%e a(3)=27,因为27(基数3)=1000,它具有3个零的块。
%e 81不在这个序列中,因为81(基数3)=10000有一个由4个连续零组成的块,并且它有2个或3个连续零的子块并不重要,因为子块在这里不计数。
%e 243位于这个序列中,因为243(以3为基数)=100000,它有一个由5个零组成的块。
%e 252在这个序列中是因为252(基数3)=100100,它有两个连续0的块,但我们不要求只有一个这样的素数0块。
%e 2187处于这个序列中,因为2187(以3为基数)=10000000,它有一个由7个零组成的块。
%t选择[Range[250],或@@(First[#]==0&&PrimeQ[Length[#]]&)/@Split[IntegerDigits[#,3]]&](*_Ray Chandler_,2005年9月12日*)
%o(Python)
%o来自重新导入拆分
%o来自sympy import isprime
%o定义三元(n):
%o如果n==0:
%o返回“0”
%o数字=[]
%o而n:
%o n,r=divmod(n,3)
%o nums.append(字符串(r))
%o返回“”.join(反向(nums))
%o序列列表,n=[],1
%o当len(seq_list)<10000时:
%o表示拆分中的d('1+|2+',三元(n)[1:]):
%o如果是质数(len(d)):
%o seq_list.append(n)
%o n+=1
%o#_W.Zane Billings_,2019年6月28日
%Y参考A007089、A037011、A086747、A110471、A110472、A110474。
%K基础,简单,无
%O 1,1号机组
%A _乔纳森·沃斯帖子_,2005年9月11日
|