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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A127542号 和为素数的{1,2,3,…,n}的子集数。 11
0, 2, 4, 7, 12, 22, 42, 76, 139, 267, 516, 999, 1951, 3824, 7486, 14681, 28797, 56191, 108921, 210746, 410016, 804971, 1591352, 3153835, 6249154, 12380967, 24553237, 48731373, 96622022, 191012244, 376293782, 739671592, 1454332766, 2867413428, 5678310305 (列表;图表;参考;;历史;文本;内部格式)
抵消
1, 2
链接
查尔斯·格里塔斯四世,n=1..1000时的n,a(n)表(T.D.Noe的前100个术语)
例子
和为素数的{1,2,3}的子集是{1,2},{2}、{3}和{2,3}。因此a(3)=4。
MAPLE公司
使用(组合):a:=proc(n)局部ct,pn,j:ct:=0:pn:=powerset(n):对于j从1到2^n do if isprime(add(pn[j][i],i=1..nops(pn[j])))=true,则ct:=ct+1否则ct:=ct fi:od:end:seq(a(n),n=1.18);
#第二个Maple项目:
b: =proc(n,s)选项记忆`如果`(n=0,
`如果`(i素数,1,0),b(n-1,s)+b(n-l,s+n))
结束时间:
a: =n->b(n,0):
seq(a(n),n=1..44)#阿洛伊斯·海因茨2023年10月22日
数学
g[n_]:=块[{p=积[1+z^i,{i,n}]},和[Boole[PrimeQ[k]]*系数[p,z,k],{k,0,n*(n+1)/2}]];数组[g,34](*雷·钱德勒2007年3月5日*)
黄体脂酮素
(哈斯克尔)
导入数据。列表(子序列)
a127542=长度。过滤器((==1)。a010051。总和)。
子序列。enumFromTo 1
--莱因哈德·祖姆凯勒2012年2月22日,2010年10月27日
(PARI)a(n)=my(v=Vec(prod(i=1,n,x^i+1)),s);对于素数(p=2,#v,s+=v[p]);秒\\查尔斯·格里特豪斯四世2014年12月19日
(PARI)第一(n)=my(v=向量(n),P=1,s);对于(k=1,n,P*=1+'x^n;s=0;对于素数(P=2,k*(k+1)/2,s+=polcoeff(P,P));v[k]=s);v(v)\\查尔斯·格里特豪斯四世2014年12月19日
交叉参考
的行总和A282516型.
关键词
非n
作者
Emeric Deutsch公司2007年3月3日
扩展
由扩展雷·钱德勒2007年3月5日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月21日11:14。包含373544个序列。(在oeis4上运行。)