A306395-OEIS公司

A306395型

素数g，使得8*g+2*p是一些孪生素数p的初等函数。

2, 3, 11, 19, 23, 31, 37, 79, 83, 97, 113, 131, 139, 157, 173, 181, 191, 211, 229, 233, 239, 241, 251, 263, 271, 281, 293, 331, 337, 359, 367, 379, 419, 431, 439, 449, 503, 541, 547, 601, 607, 619, 641, 653, 659, 661, 691, 701, 719, 727, 743, 761, 769, 809 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,1`
	评论	`到目前为止，我发现至少存在一个素数g和至少一个孪生素数pA001097号，因此8g+2p是初生的。一些相关的孪生素数相当大。例如，与a（112）相关的孪晶素数长242位。对于每个n，程序返回primonial、g、g（mod 30）、twin-prime（mod三十）和twin-preme。这些数据位于链接文件中。`
	链接	`Michael G.Kaarhus，n=0..250时的n、a（n）表` `Michael G.Kaarhus，其他数据`
	例子	`n\|b#=8g+2p大于或小于` `--+----------------------------------------------` `1\|5#=82+27以上` `2\|5#=83+23小` `3\|7#=811+261以上` `4\|7#=819+229较小` `5\|7#=823+213以上` `6\|11#=831+21031小`
	黄体脂酮素	`（CALC）#/usr/bin/calc-q-f` `全局b=5，chck=list（），g=1，gt，mg30=2，mg6，mp30=7，n=1，oar=pfact（b）/2，` `tpr=7，ts='greatr'，fmt=“%4d%s%5d%s%7d%7d%9d%11s%s%d\n”；` `定义bookem（an）{` `mp30=mod（tpr，30）；` `打印f（fmt，n，'.'，b，'#'，an，mg30，mp30，ts，''，tpr）；` `n++；附加（chck，an）；返回（a）；` `}` `定义incg（）{` `顶部：g=下一质数（g）；mg6=mod（g，6）；mg30=mod（g，30）；` `如果（mg30==13\|mg30==17）{转到顶部；}` `否则{gt=g*4；返回（mg30）；}` `}` `定义incb（p）{b=nextprime（p）；oar=pfact（b）/2；return（b）；}` `打印；` `printf（fmt，‘n’，‘.’，‘b’，‘#’，‘g’，‘g%30’，‘twin%30’，‘双胞胎类型’，‘’，‘孪生素数’）；` `打印“-----------------------------------------------------------”；` `对于（i=0；i<=1；i++）{g=nextprime（g）；bookem（g），tpr=3；ts='lesser'；mg30=3；}` `b=包含b（b）；while（g<=b）{incg（）；}` `而（n<=35）{` `而（g>b）{` `tpr=oar-gt；` `如果（tpr<=7）{incb（b）；继续；}` `if（ptest（tpr，200））{` `如果（mg6==1&&ptest（tpr+2200））{` `ts=“lesser”；bookem（g）；断裂；` `}` `否则{if（ptest（tpr-2200））{` `ts='greatr'；账簿（g）；断裂；` `}` `}` `}` `incb（b）；` `}` `incg（）；` `而（oar-gt>0）{b=初等（b）；oar=pfact（b）/2；}` `}` `印刷品；chs=尺寸（chck）-1；对于（i=0；i<=chs；i++）{打印i+1，chck[[i]]；}`
	交叉参考	`的后续A000040型.的超序列A218046型.` `上下文中的序列：A095984号 A229550型 A172258号A363497型 A135206年 A368278型` `相邻序列：A306392型 A306393型 A306394型A306396 A306397型 A306398型`
	关键词	`非n`
	作者	`迈克尔·卡胡斯（Michael G.Kaarhus）2019年2月12日`
	状态	`经核准的`