登录
OEIS由支持OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)

修订历史记录A237638号

(带下划线的文本是附加;删除线文本是删除.)

显示条目1-10|较旧的更改
A237638号 a(n)是素数集的数量,使得每个集合包含足够的素数,以将从6到2n的每个偶数分解为其两个元素的和(允许重用),而这些集合都不是另一个这样的集合的子集。
(历史;已发布版本)
#13通过拉尔夫·斯蒂芬美国东部时间2014年5月17日星期六03:27:45
状态

提出

经核准的

#12通过韦斯利·伊万·赫特2014年5月7日星期三01:25:39 EDT
状态

编辑

提出

讨论
2007年5月3日 14:03
雷舟(Lei Zhou):是的。谢谢!
#11通过韦斯利·伊万·赫特2014年5月7日星期三01:24:17 EDT
名称

a(n)是素数集的数量,使得每个素数集包含足够的素数分解岩分解从6到2n的每个偶数进入之内它的两个元素之和(允许重用),而这些集合都不是另一个此类集合的子集。

例子

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,7,13,19},{}, {3,5,7,11,17,19},{}, {3,5,7,11,17,23}. 所以a(13)=5。

数学

如果[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项及以后的内容*)*)

状态

提出

编辑

讨论
2007年5月3日 01:25
韦斯利·伊万·赫特:雷,这些变化还好吗?
#10通过雷舟(Lei Zhou)美国东部时间2014年5月5日星期一13:09:39
状态

编辑

提出

#9通过雷舟(Lei Zhou)2014年5月5日星期一13:09:30 EDT
链接

周磊,<a href=“/A237638号/b237638.txt“>n表,n=3..79时为a(n)</a>

状态

提出

编辑

#8通过雷舟(Lei Zhou)2014年5月2日星期五20:28:01 EDT
状态

编辑

提出

#7通过雷舟(Lei Zhou)2014年5月2日星期五20:27:56 EDT
数据

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

数学

如果[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,5760}](*程序列出了第4项及以上内容*)

状态

提出

编辑

#6通过雷舟(Lei Zhou)2014年5月2日星期五美国东部夏令时20:26:08
状态

编辑

提出

#5通过雷舟(Lei Zhou)2014年5月2日星期五20:26:04 EDT
名称

分配(n个) 这个 属于 首要的 这样的 那个 每个 设置 包含 足够地 首要的 数字 分解岩 每一个 即使 6 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

抵消

3,6

例子

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,57}](*程序列出了第4项及其后的内容*)

交叉参考

囊性纤维变性。A000040型,A002375号,2008年2月,A237628型.

关键字

分配

非n,坚硬的

作者

雷舟(Lei Zhou)2014年5月2日

状态

经核准的

编辑

#4通过雷舟(Lei Zhou)2014年5月2日星期五20:26:04 EDT
名称

分配给雷州

关键字

回收利用

分配

查找|欢迎光临|维基|寄存器|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年7月19日13:29。包含374394个序列。(在oeis4上运行。)