|
|
|
|
29, 977, 1381, 1439, 3109, 3539, 4357, 4397, 5563, 7159, 8273, 8737, 10711, 11117, 13109, 13841, 15101, 18731, 18839, 20543, 21391, 21851, 23459, 24877, 27653, 28477, 28697, 30677, 32029, 32971, 34631, 35863, 36979, 37019, 37529, 38189
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
链接
|
|
|
例子
|
29是成员,因为29=(5+7+11+13+17+19+23+29+31+37+41+43+47+53+59)/15。
|
|
数学
|
转置[Select[Partition[Prime[Range[5000]],15,1],#[[8]]==(#[1]]+#[2]]+#[[3]]+#[[4]]+#[0]]+#1[[6]+#[[7]+#[[9]]+#[[10]+#[11]]+#[[11]]+#[[12]]+#[13]+#[C4]+#[15]])/14&][8]]
(*第二个节目:*)
使用[{k=7},选择[MapIndexed[{Prime[First@#2+k],#1}&,Mean/@分区[Prime@Range[5000],2k+1,1]],SameQ@#&][[All,1]]](*迈克尔·德弗利格2018年2月15日*)
|
|
黄体脂酮素
|
(间隙)P:=已过滤([1..70000],IsPrime);;
a: =列表(已过滤(列表([0..5000],k->列表([8..22],j->P[j-7+k])),i->
总和(i)/15=i[8]),m->m[8]#穆尼鲁A阿西鲁2018年2月14日
(PARI)isok(p)={if(isprime(p),k=primepi(p);如果(k>7,sum(i=k-7,k+7,prime(i))==15*p;);)\\米歇尔·马库斯,2018年3月7日
|
|
交叉参考
|
参见。A096693号,A006562号,A082077号,A082078号,A082079号,A096697号,A096698号,A096700型,A096701号,A096702号,A096703号,A096704号.
|
|
关键字
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|