A222580-OEIS公司

A222580型

写入n的方式数=p_m-p_{m-1}++（-1）^{m-k}pk，其中k<m和pm<=3n，以及pm+1和pk-1都是实用的，其中pj表示j-th素数。

1, 1, 1, 2, 1, 1, 1, 3, 2, 1, 1, 3, 2, 3, 2, 2, 2, 3, 1, 2, 2, 3, 2, 2, 1, 2, 3, 3, 1, 1, 2, 4, 2, 1, 3, 2, 2, 2, 3, 3, 2, 2, 2, 2, 6, 1, 2, 3, 4, 2, 3, 3, 2, 3, 4, 2, 4, 2, 1, 1, 4, 3, 4, 2, 4, 1, 3, 3, 2, 4, 4, 2, 3, 2, 3, 3, 3, 3, 2, 5, 1, 3, 4, 7, 4, 2, 3, 2, 1, 5, 2, 4, 2, 7, 3, 3, 3, 4, 5, 6 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,4`
	评论	`猜测：所有的条件都是肯定的。` `另请参阅与以下内容相关的评论A222579型.`
	链接	`孙志伟，n=1..10000时的n，a（n）表` `孙志伟，关于只取素值的函数，arXiv:1202.6589。` `孙志伟，涉及素数和二次型的猜想，arXiv:1211.1588。`
	例子	`a（9）=2，因为9=11-7+5=19-17+13-11+7-5+3，其中12、4、20、2都是实用的。` `a（806）=1，因为806=p_{358}-p_{357}++p{150}-p{149}和p{358}=2411<=3*806=2418，以及2412和p{149}-1=858都是实用的。`
	数学	`f[n_]：=f[n]=系数整数[n]` `Pow[n_，i_]：=Pow[n，i]=部件[部件[f[n]，i]，1]^` `Con[n_]：=Con[n]=总和[If[Part[Part[f[n]，s+1]，1]<=DivisorSigma[1，Product[Pow[n，i]，{i，1，s}]]+1，0，1]，{s，1，Length[f[n]]-1}]` `pr[n]：=pr[n]=n>0&&（n<3\|\|Mod[n，2]+Con[n]==0）` `pp[k_]：=pp[k]=pr[Prime[k]+1]==真` `pq[k_]：=pq[k]=pr[素数[k]-1]==真` `s[0_]：=0` `s[n]：=s[n]=素数[n]-s[n-1]` `a[n_]：=a[n]=和[If[pp[j]==True&&pq[i+1]==True&&s[j]-（-1）^（j-i）*s[i]==n，1，0]，{j，素数Pi[n]+1，素数PI[3n]}，{i，0，j-2}]` `表[a[n]，{n，1100}]`
	交叉参考	`囊性纤维变性。A000040型,A005153号,A210479号,A222579型.` `上下文中的序列：A353236飞机 A325939型 A318586型A316978型 A331023型 A284345号` `相邻序列：A222577型 A222578型 A222579型A222581型 A222582型 A222583型`
	关键词	`非n`
	作者	`孙志伟2013年2月25日`
	状态	`经核准的`

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

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

上次修改时间：美国东部夏令时2023年3月26日06:04。包含361529个序列。（在oeis4上运行。）