显示发现的61个结果中的1-10个。
将非素数正整数按数字顺序写在标签上,形成无限序列L。现在考虑A000040型(质数):2 3 5 7 1 1 3 1 7 1 9 2 2 9 3 1 7 4 1 4 7 5 3。。。(A033308号). 这个序列给出了一个安排L,它产生相同的数字序列,但必须使用最小的未使用标签,这不会导致矛盾。
+20 5
235, 711, 1, 3171, 9, 232, 93, 1374, 14, 34, 75, 35, 96, 16, 77, 1737, 98, 38, 99, 710, 110, 310, 71091, 1312, 713, 1137, 1391, 4, 91, 51, 15, 716, 316, 717, 3179, 18, 119, 11931, 97199, 21, 12, 2322, 72, 292, 33, 2392, 412, 512, 57, 26, 32, 6, 92, 712, 772, 8
评论
这可以大致改为:“以最经济的方式改写素数‘模式’,只使用非素数。不要使用任何非素数两次。”
例子
我们必须从2、3、5、7、11、13……开始,。。。我们不能用标签“2”或“23”表示“2”,所以下一个可能是标签“235”(L中第一个可用的非素数)。
数学
f[lst_List,k_]:=块[{L=lst,g,a={},m=0},g[]:={Set[m,First@FromDigits@Append[IntegerDigits@m,Firts@#]],Set[L,Last@#]}&@TakeDrop[L,1];做[g[];而[Or[PrimeQ@m,MemberQ[a,m]],g[]];附加到[a,m];m=0,{k}];a] ;f[Flatten@Map[整数位数,质数@范围@200],56](*迈克尔·德弗利格,2015年11月29日,10.2*版)
1, 6, 2, 3, 22, 4, 32, 5, 42, 13, 48, 6, 63, 8, 23, 78, 33, 10, 96, 12, 590, 111, 114, 2, 129, 132, 138, 64, 150, 16, 159, 9, 15, 124, 25, 3, 189, 20, 43, 73, 207, 22, 216, 24, 228, 234, 237, 26, 249, 76, 258, 79, 264, 28, 270, 276, 279, 4, 291, 30, 300, 32, 830
级联素数中第n个素数第一次出现的位置(A033308号,科普兰-鄂尔多斯常数)。
+20 三
2, 3, 4, 5, 6, 8, 10, 12, 2, 16, 9, 20, 22, 24, 26, 28, 30, 32, 34, 5, 38, 40, 42, 44, 46, 48, 51, 54, 57, 7, 63, 8, 19, 72, 75, 78, 81, 84, 33, 37, 93, 96, 99, 102, 105, 108, 111, 114, 117, 120, 123, 126, 129, 132, 135, 138, 141, 64, 147, 150, 153, 16, 159, 67, 18
MAPLE公司
N: =100:#对于(1)。。a(否)
S: =cat(“.”,seq(ithprime(i),i=1..N)):
seq(StringTools:-搜索(转换(ithprime(i),字符串),S),i=1..N)#罗伯特·伊斯雷尔2019年6月28日
将素数写入字符串:2357111317192329…(参见。A033308号). 序列给出了自然数在字符串中的第一个位置。
+20 三
5, 1, 2, 21, 3, 31, 4, 41, 12, 47, 5, 62, 7, 22, 77, 32, 9, 95, 11, 589, 110, 113, 1, 128, 131, 137, 63, 149, 15, 158, 8, 14, 123, 24, 2, 188, 19, 42, 72, 206, 21, 215, 23, 227, 233, 236, 25, 248, 75, 257, 78, 263, 27, 269, 275, 278, 3, 290, 29, 299, 31, 829
评论
由科普兰-厄尔德常数的正规性定义所有a-亚伦·韦纳2013年9月19日
例子
字符串中第一次出现的“111”是5,因此a(111)=5。
MAPLE公司
with(StringTools):s:=“”:对于从1到300的n dos:=cat(s,convert(ithprime(n),string)):od:seq(Search(convert#纳撒尼尔·约翰斯顿2011年5月26日
数学
使用[{prd=Flatten[IntegerDigits/@Prime[Range[1000]]],nn=10},Flatten[Table[SequencePosition[prd,IntegerDigits[n],1],{n,70}],1]][[All,1]](*需要Mathematica版本10或更高版本*)(*哈维·P·戴尔2019年5月12日*)
黄体脂酮素
(Python)
从sympy导入primerange
来自itertools导入计数,takewhile
定义afind(plimit):
s=“”.join(primerange(1,plimit+1)中p的str(p))
takewhile中n的return[1+s.find(str(n))(lambda i:str(i)in s,count(1))]
Copeland-Erdős常数素数(项(数字)的串联A033308号是质数)。
+20 三
评论
取Copeland-Erdős常数的连续十进制数字(从第一位开始)得到的素数。
接下来的术语太大,无法显示:a(5)=235711131…6917017097(353位),a(6)=23571 1131…1701709719(355位)。。。
交叉参考
囊性纤维变性。A227530型(第n个Copeland-Erdős素数中的小数位数)。
囊性纤维变性。A033308号(Copeland-Erdős常数的十进制展开:串联素数)。
23, 5, 7, 11, 13, 17, 19, 2, 3, 293, 137, 41, 43, 47, 53, 59, 61, 67, 71, 73, 79, 83, 89, 97, 101, 103, 107, 109, 113, 127, 131, 1371391491511, 571, 631, 67173179181191, 193, 197, 199, 211, 223, 227, 229, 233, 239, 241, 251, 257, 263, 269, 271, 277, 281, 283
评论
原始名称:“将每个大于0的素数写在一个标签上。将标签按数字顺序排列,形成一个无限序列L。考虑L的单个数字的连续性:2 3 5 7 1 1 1 3 1 7 1 9 2 2 9 3 1 3 7 4 4 4 7 5 3 9 1 6 7 1 7 3 7 7 1 7 7 1 3 9 9……(参见A033308号). 序列S给出了再现相同数字序列的标签的重新排列,受L的标签不能表示自身的约束,并且必须使用不会导致矛盾的最小标签。"
大致可以这样改写:“以最经济的方式改写‘素数模式’,只使用素数,但要重新排列。不要多次使用任何素数。”
a(180)有1000多个数字-丹尼·罗拉博2015年11月29日
例子
我们必须从“2,3,5,7,11,…”开始,我们不能让第一项是2,第一个素数,所以最小的可用素数是23。
数学
f[lst_List,k_]:=块[{L=lst,g,a={},m=0},g[]:={Set[m,First@FromDigits@Append[IntegerDigits@m,Firts@#]],Set[L,Last@#]}&@TakeDrop[L,1];做[g[];而[Or[m==素数[Length@a+1]!PrimeQ@m,MemberQ[a,m]],g[]];附加到[a,m];m=0,{k}];a] ;f[Flatten@Map[整数位数,质数@范围@120],53](*迈克尔·德弗利格,2015年11月29日,10.2*版)
黄体脂酮素
(鼠尾草)
Pr,p,s,A,i=素数(),2,“”,[],1
而长度(A)<n:
当len(s)<=i:s,p=s+str(p),next_prime(p)
q=整数(s[:i])
如果s[i]=“0”和is_prime(q)和Pr.unrank(len(A))=q和(q不在A中):
A.附录(q)
s、 i=s[i:],1
其他:i+=1
返回A
23, 31, 71, 113, 131, 137, 167, 173, 271, 293, 311, 313, 317, 331, 347, 359, 373, 379, 389, 491, 571, 593, 631, 673, 677, 719, 733, 761, 773, 811, 877, 911, 941, 971, 977, 983, 997, 1031, 1091, 1103, 1109, 1171, 1193, 1223, 1231, 1277, 1283, 1291, 1361
1, 2, 4, 11, 353, 355, 499, 1171, 1543, 5719, 11048, 68433, 97855, 292447
评论
a(15)>300000-埃里克·韦斯特因(根据截至2015年12月13日的Mark Rodenkirch)
其中较大的是可能素数。
a(15)>5*10^5,根据Mark Rodenkirch,2016年6月-M.F.哈斯勒2017年4月24日
交叉参考
另请参阅A033308号(Copeland-Erdős常数的十进制展开:串联素数)。
14, 9, 28, 11, 7, 19, 37, 99, 14, 121, 18, 39, 130, 219, 178, 184, 187, 238, 88, 11, 91, 94, 154, 202, 106, 481, 493, 2534, 529, 60, 146, 61, 69, 689, 254, 562, 287, 570, 87, 90, 1110, 578, 440, 586, 355, 442, 491, 602, 1153, 606, 1181, 1134, 1233, 1142
Sum_{k>=0}给定常数的连分式中的增量最大项A033308号(k) /2^k=2.89104866587305422。。。。
+20 0
2, 8, 10, 32, 39, 5903, 135598
评论
曾用名:Copeland-Erdos常数0.235711…(串联素数)连分式中的增量最大项。
数学
a={};Do[a=Append[a,IntegerDigits[Prime[n]]],{n,1,5*10^4}];b=连续分数[N[起始数字[{压扁[a],0},2],5*10^4];c=-1;d={};Do[如果[b[[n]]>c,c=b[[n]];d=附加[d,c]],{n,1,48336}];d日
扩展
名称更改为与数据匹配肖恩·欧文2023年11月3日
搜索在0.026秒内完成
查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。
许可协议、使用条款、隐私政策。.
上次修改时间:2024年9月23日18:10 EDT。包含376182个序列。(在oeis4上运行。)
|