A082078-OEIS公司

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

A082078号

三阶平衡素数。

18

17, 53, 157, 173, 193, 229, 349, 439, 607, 659, 701, 709, 977, 1153, 1187, 1301, 1619, 2281, 2287, 2293, 2671, 2819, 2843, 3067, 3313, 3539, 3673, 3727, 3833, 4013, 4051, 4517, 4951, 5101, 5897, 6079, 6203, 6211, 6323, 6679, 6869, 7321, 7589, 7643, 7907

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1,1

评论

6个素数在其“邻域”中的算术平均值；不要与“三重平衡素数”混淆(2015年8月15日).

三阶平衡素数不一定是一阶平衡(A006562号)或两个(A082077号)等。[拼写错误由更正扎克·塞多夫2008年7月23日]

链接

Aaron Topone，n=1..1000时的n，a（n）表

例子

p=53=（41+43+47+53+59+61+67）/7=371/7，即算术平均值。

数学

Do[s3=素数[n]+素数[n+1]+素数[n+2]；s5=素数[n-1]+s3+素数[n+3]；s7=素数[n-2]+s5+素数[n+4]；如果[Equal[s7/7，质数[n+1]]，打印[Prime[n+1]]，{n，3，5000}]

（*第二个节目：*）

使用[{k=3}，选择[MapIndexed[{Prime[First@#2+k]，#1}&，Mean/@Partition[Prime@Range[10^3]，2k+1，1]]，SameQ@@#&][[All，1]]](*迈克尔·德弗利格2018年2月15日*）

选择[Partition[Prime[Range[1500]]，7，1]，Mean[#]==#[[4]]&][[All，4]](*哈维·P·戴尔，2022年7月1日*）

黄体脂酮素

（间隙）P:=已过滤（[1..10000]，IsPrime）；；

a： =列表（已过滤（列表（[0..1000]，k->列表（[4..10]，j->P[j-3+k]）），i->

总和（i）/7=i[4]），m->m[4]； #穆尼鲁·A·阿西鲁2018年2月14日

（PARI）isok（p）={if（isprime（p），k=primepi（p）；如果（k>3，sum（i=k-3，k+3，prime（i））==7*p；）；）\\米歇尔·马库斯，2018年3月7日

交叉参考

囊性纤维变性。A006562号,A082077美元,A082079号,A096697号,A096698号,A096699号,A096700型,A096701号,A096702号,A096703号,A096704号.

囊性纤维变性。A096693号,A082080型,2015年8月15日,A051795号,A006562号.

上下文中的序列：A180456号 A154409号 A033213号*A107175号 A244270型 A244271号

相邻序列：A082075号 A082076号 A082077号*A082079号 A082080型 A082081号

关键词

非n

作者

拉博斯·埃利默2003年4月8日

状态

经核准的