|
|
A330433型 |
| 对k进行编号,这样如果k有一个至少部分为p的素数分区,那么k至少还有一个其他素数分区至少部分为p。 |
|
1
|
|
|
63, 161, 195, 235, 253, 425, 513, 581, 611, 615, 635, 667, 767, 779, 791, 803, 959, 1001, 1015, 1079, 1095, 1121, 1127, 1251, 1253, 1265, 1267, 1547, 1557, 1595, 1617, 1625, 1647, 1649, 1681, 1683, 1687, 1771, 1817, 1829, 1915, 1921, 2071, 2125, 2159, 2185
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
如果k是素数,那么[k]是k的唯一一个具有最小部分k的素数分区,因此k不可能在这个序列中。如果k>2是偶数,那么(假设哥德巴赫猜想有效)k(p<=q)有一个素分划[p,q],其中p是最大可能的最小部分,因此用最小部分p不可能有k的其他分划,因此k不是项。因此,这个序列的所有项都是奇数合成。
|
|
链接
|
|
|
例子
|
9不是一个项,因为[3,3,3]是9的唯一素数分区,其中3是最小部分。
63是一个术语,因为每一个可能的素数分划都按如下方式计算,其中(m,p)表示63的m个分划,其最小部分为p:(2198,2)、(323,3)、(60,5)、(15,7)、(5,11)、(2,13)、(2,17),(m值之和=2605=A000607号(63)). 63必须在序列中,因为(1,p)没有出现在这个列表中,并且是最小的数字,因为每一个奇数组合<63都至少有一个带唯一最小部分的素数分区(如上面的9)。
|
|
MAPLE公司
|
b: =proc(n,p,t)选项记忆`如果`(n=0,1,`如果`(p>n,0,(q->
加(b(n-p*j,q,1),j=1..n/p)*t^p+b(n,q,t))(下一素数(p))
结束时间:
a: =proc(n)选项记忆;局部k;对于a(n-1)+1中的k
而1in{coeffs(b(k,2,x))}做od;k个
结束:a(0):=1:
|
|
数学
|
b[n_,p_,t_]:=b[n,p,t]=如果[n==0,1,如果[p>n,0,函数[q,和[b[n-pj,q,1],{j,1,n/p}]t^p+b[n、q,t]][NextPrime[p]]];
a[0]=1;
a[n]:=a[n]=模块[{k},For[k=a[n-1]+1,MemberQ[CoefficientList[b[k,2,x],x],1],k++];k] ;
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|