|
| |
| |
|
|
|
71, 211, 397, 409, 1487, 1559, 2281, 4397, 4937, 5347, 5857, 7577, 10399, 11369, 12583, 14843, 19391, 21739, 21787, 22067, 22469, 23789, 25639, 27329, 29537, 29867, 30197, 30911, 33347, 33931, 34267, 35099, 36131, 36691, 37549, 38671
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
偏移
|
1,1
|
|
|
链接
|
|
|
|
例子
|
71是成员，因为71=（43+47+53+59+61+67+71+73+79+83+89+97+101）/13。
|
|
|
数学
|
转置[Select[Partition[Prime[Range[5000]]，13，1]，#[[7]]==（#[1]]+#[2]]+#[[3]]+#[4]]+#[5]]+#1[[6]+#[8]]+＃[[9]]+#[[10]+#[11]]+#[[11]]+#[[12]]+#[12]）/12&][7]]
转座[Select[Partition[Prime[Range[5000]]，13，1]，Total[#]/13==#[[7]&]][[7](*哈维·P·戴尔2011年2月25日*）
|
|
|
黄体脂酮素
|
（间隙）P:=已过滤（[1..90000]，IsPrime）；；
b： =6；；
a： =列表（已过滤（列表（[0..5000]，k->列表（[b+1..3*b+1]，j->P[j-b+k]）），i->总和（i）/（2*b+1）=i[b+1]），m->m[b+1）#穆尼鲁·A·阿西鲁2018年2月15日
（PARI）isok（p）={if（isprime（p），k=primepi（p）；如果（k>6，sum（i=k-6，k+6，prime（i））==13*p；）；）\\米歇尔·马库斯，2018年3月7日
|
|
|
交叉参考
|
囊性纤维变性。A096693号,A006562号,A082077美元,A082078号,A082079号,A096697号,A096699号,A096700型,A096701号,A096702号,A096703号,A096704号.
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
