|
| |
|
| A237638号 |
| a（n）是素数集的数量，使得每个素数集包含足够的素数，可以将从6到2n的每个偶数分解为其两个元素的和（允许重用），而这些集都不是另一个这样的集的子集。 |
|
2
|
|
|
|
1, 1, 1, 1, 1, 2, 2, 3, 4, 4, 5, 6, 6, 9, 11, 11, 11, 13, 16, 23, 25, 31, 47, 57, 63, 70, 74, 79, 82, 122, 131, 129, 180, 215, 219, 323, 367, 446, 501, 531, 661, 867, 897, 1311, 1471, 1691, 1695, 2130, 2288, 2833, 3363, 3891, 5435, 8068, 8867, 13476, 15451, 15897
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
3,6
|
|
|
链接
|
雷舟，n=3..79时的n，a（n）表
|
|
|
例子
|
n=4，2n=8。只有一组素数{3,5}，使得6=3+3，8=3+5。所以a（4）=1。
...
n=8，2n=16。我们可以找到两个具有这种特征的集合，{3,5,7,11}和{3,5，7,13}。所以a（8）=2。在这里，任何含有更多素数的集合要么包含一个未使用的素数，要么这两个集合中的一个是它们的子集，如{3,5,7,11,13}，因此不予考虑。所以a（8）=2。
...
n=13，2n=26。我们发现了五个这样的集合：{3,5,7,11,13}，{3,5，7,13,17}，}3,5,13,19}，[3]5,7,11,17,23}。所以a（13）=5。
|
|
|
数学
|
a={{3}}；表[n2=2*n；na={}；la=最后[a]；lo=长度[la]；做[ok=0；做[p1=la[[i，j]]；p2=n2-p1；如果[MemberQ[la[i]]，p2]，ok=1]，{j，1，长度[la[[i]]}]；
如果[ok==1，na=Sort[Append[na，la[i]]]，Do[p1=la[[i，j]]；p2=n2-p1；如果[PrimeQ[p2]，ng=Sort[Append[la[i]]，p2]]；大=0；如果[Length[na]>0，Do[If[Intersection[na[[k]]，ng]==na[[k]，big=1]，{k，1，Length[na]}]]；如果[big==0，na=Sort[Append[na，ng]]]，{j，1，Length[la[[i]]}]]，}i，1，lo}]；附加到[a，na]；长度[na]，{n，4，60}]（*程序列出了第4项及其后的内容*）
|
|
|
交叉参考
|
囊性纤维变性。A000040型,A002375号,A240708型,A237628型.
上下文中的序列：A248333型 A303905型 A341904型*A343205型 A334483型 A261093型
相邻序列：A237635型 A237636型 A237637号*A237639号 A237640型 A237641号
|
|
|
关键词
|
非n,坚硬的
|
|
|
作者
|
雷舟（Lei Zhou）2014年5月2日
|
|
|
状态
|
经核准的
|
| |
|
|
