搜索: a088643-编号:a088647
|
|
|
|
3, 5, 3, 7, 5, 3, 7, 5, 7, 5, 11, 7, 5, 7, 5, 13, 11, 7, 5, 7, 5, 13, 11, 13, 11, 7, 5, 3, 17, 13, 11, 13, 11, 7, 5, 3, 19, 17, 13, 11, 13, 11, 7, 5, 3, 19, 17, 19, 17, 13, 11, 7, 5, 7, 5, 23, 19, 17, 19, 17, 13, 11, 7, 5, 7, 5, 23, 19, 17, 19, 23, 19, 13
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
偏移
|
1,1
|
|
评论
|
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
. ---+--------------------------------------------+----------------------
. 1 | 3 | 3
. 2 | 5 3 | 3 5
. 3 | 7 5 3 | 3 5 7
.4|7 5 7 5 |5 7
. 5 | 11 7 5 7 5 | 5 7 11
. 6 | 13 11 7 5 7 5 | 5 7 11 13
. 7 | 13 11 13 11 7 5 3 | 3 5 7 11 13
. 8 | 17 13 11 13 11 7 5 3 | 3 5 7 11 13 17
. 9 | 19 17 13 11 13 11 7 5 3 | 3 5 7 11 13 17 19
. 10 | 19 17 19 17 13 11 7 5 7 5 | 5 7 11 13 17 19
.11 | 23 19 17 19 17 13 11 7 5 7 5 | 5 7 11 13 17 19 23
. 12 | 23 19 17 19 23 19 13 11 7 5 7 5 | 5 7 11 13 17 19 23
. 13 | 23 19 23 19 17 23 19 11 7 11 13 7 3 | 3 7 11 13 17 19 23
. 14 | 29 23 19 23 19 17 23 19 11 7 11 13 7 3 | 3 7 11 13 17 19 23 29
|
|
数学
|
A[n_,1]:=n;
A[n_,k_]:=A[n,k]=对于[m=n-1,m>=1,m---,如果[PrimeQ[m+A[n、k-1]]&&FreeQ[表[A[n和j],{j,1,k-1}],m],返回[m]]];
T[n]:=T[n]=2移动平均值[表[A[n+1,k],{k,1,n+1}],{1,1}];
|
|
黄体脂酮素
|
(哈斯克尔)
a255313 n k=a255313_tabl!!(n-1)!!(k-1)
a255313_row n=a255313 _ tabl!!(n-1)
a255313_tabl=zipWith(zipWith+)tss$map-tail tss
其中tss=尾部a088643_tabl
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|
|
A346778飞机
|
| 最小k>=1,使得{b(1),b(2),…,b(k)}={n,n-1,…,n-k+1}和b(k+1)=n-k,其中b(1..n)是A088643号,或如果不存在这样的k>=1,则k=0。 |
|
+20 5
|
|
|
0, 1, 1, 1, 4, 1, 1, 4, 1, 1, 4, 1, 6, 12, 1, 1, 4, 6, 1, 8, 1, 1, 4, 1, 6, 22, 1, 9, 10, 1, 1, 4, 6, 1, 8, 1, 1, 4, 6, 1, 8, 1, 18, 9, 1, 9, 10, 16, 1, 18, 1, 1, 4, 1, 1, 4, 1, 6, 12, 11, 27, 14, 62, 1, 17, 1, 18, 18, 1, 1, 4, 6, 8, 10, 1, 1, 4, 6, 1, 8, 19
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
偏移
|
1,5
|
|
评论
|
等价地,最小k,使得{b(1),b(2),…,b(k)}={n,n-1,…,n-k+1}和{b(2。
|
|
链接
|
|
|
数学
|
t[n,1]:=n;
t[n_,k_]:=t[n,k]=对于[m=n-1,m>=1,m---,如果[PrimeQ[m+t[n、k-1]]&&FreeQ[表[t[n和j],{j,1,k-1}],m],返回[m]]];
a[n_]:=如果[n==1,0,模[{r,g},r=表[t[n,k],{k,1,n}];对于[g=1,g<=n-1,g++,如果[联盟@r[[1;;g]]==范围[n-g+1,n]&r[[g+1]]==n-g,返回[g]]]];
|
|
黄体脂酮素
|
(PARI)适用({A346778飞机(n,r)=A088643号_行(n)=对于(g=1,n-1,集合(r[1..g])==[n-g+1..n]&r[g+1]==n-g&return(g))},[1.99])\\M.F.哈斯勒2021年8月4日
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
已批准
|
|
|
|
|
|
|
1, 1, 1, 7, 2, 4, 34, 1, 47, 47, 47, 47, 47, 47, 47, 153, 212, 212, 212, 212, 212, 212, 212, 334, 334, 785, 785, 720, 785, 785, 785, 785, 785, 1144, 1144, 1144, 1167, 2105, 2105, 2105, 2105, 2105, 2105, 2105, 2105, 2105, 2105, 2105, 2105, 2105
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
偏移
|
1,4
|
|
评论
|
|
|
链接
|
|
|
交叉参考
|
|
|
关键词
|
非n,美好的
|
|
作者
|
|
|
扩展
|
OEIS编辑修订的条目,2021年8月3日
|
|
状态
|
已批准
|
|
|
|
|
|
|
1, 2, 3, 4, 26, 27, 35, 36, 37, 47, 153, 206, 254, 255, 267, 326, 334, 543, 544, 550, 573, 590, 604, 719, 720, 965, 1327, 1340, 1353, 1354, 1414, 1423, 1453, 1474, 1579, 1589, 1598, 1762, 1856, 2105, 2840, 2921, 2922, 2928
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
偏移
|
1,2
|
|
评论
|
我不知道这个序列是否是无限的。给定任何一个项,很容易计算所有早期项。我所知道的序列中最大的数字是21977。
|
|
链接
|
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|
|
|
|
1、2、3、2、5、6、5、8、9、8、9、10、9、14、15、16、13、14、17、20、21、20、21、22、22、23、24、29、30、31、28、29、32、35、36、37、34、35、38、39、40、39、41、42、42、42、47、50、51、50、53、54、55、56、57、58、59、50、51、62、63、63、68、69、70、71、72、65
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
偏移
|
1,2
|
|
链接
|
|
|
交叉参考
|
|
|
关键词
|
非n,容易的
|
|
作者
|
|
|
扩展
|
|
|
状态
|
已批准
|
|
|
|
|
A055265号
|
| a(n)是序列中尚未存在的最小正整数,使得a(n)+a(n-1)是素数,从a(1)=1开始。 |
|
+10 40
|
|
|
1, 2, 3, 4, 7, 6, 5, 8, 9, 10, 13, 16, 15, 14, 17, 12, 11, 18, 19, 22, 21, 20, 23, 24, 29, 30, 31, 28, 25, 34, 27, 26, 33, 38, 35, 32, 39, 40, 43, 36, 37, 42, 41, 48, 49, 52, 45, 44, 53, 50, 47, 54, 55, 46, 51, 56, 57, 70, 61, 66, 65, 62, 69, 58, 73, 64, 63, 68, 59, 72, 67, 60
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
偏移
|
1,2
|
|
评论
|
序列是明确定义的(项必须在奇偶性中交替,并且根据狄利克雷定理,a(n+1)总是存在的)-N.J.A.斯隆2017年3月7日
|
|
链接
|
M.F.Hasler,相邻项的质数和,OEIS Wiki,2019年11月23日
|
|
配方奶粉
|
|
|
例子
|
a(5)=7,因为已经使用了1、2、3和4,4+5=9和4+6=10都不是质数,而4+7=11是质数。
|
|
MAPLE公司
|
当地a,i,已知;
选项记忆;
如果n=1,则
1;
其他的
从1开始
已知:=假;
对于i从1到n-1 do
如果procname(i)=a,则
已知:=真;
断裂;
结束条件:;
结束do:
如果未知且为isprime(procname(n-1)+a),则
返回a;
结束条件:;
结束do:
结束条件:;
结束进程:
|
|
数学
|
f[s_List]:=块[{k=1,a=s[[-1]]},而[MemberQ[s,k]||!素数Q[a+k],k++];追加[s,k]];嵌套[f,{1},71](*罗伯特·威尔逊v2009年5月27日*)
q=2000;a={1};z=范围[2,2*q];当[Length[z]>q-1时,k=1;While[!PrimeQ[z[[k]]+Last[a]],k++];附加到[a,z[[k]]];z=删除[z,k]];打印[a](*速度快200倍*)(*弗拉基米尔·约瑟夫·斯蒂芬·奥尔洛夫斯基2011年5月3日*)
|
|
黄体脂酮素
|
(HP 50G计算器)<<DUPDUP+2->N M L<<{1}1 N 1-对于i L M,对于j DUP j POS,如果j DUP'L'STO M'j'STO END NEXT OVER i在DUP2+DUP ISPRIME时得到掉落?不要重复掉落,在末端旋转掉落之前,不要重复1+3拾取位置>>>杰拉尔德·希利尔2008年10月28日
(哈斯克尔)
导入数据。列表(删除)
a055265 n=a055265_列表!!(n-1)
a055265_list=1:f 1[2..]其中
f x vs=g vs其中
g(w:ws)=如果a010051(x+w)==1
然后w:fw(删除wvs)其他gws
(PARI)v=[1];n=1;while(n<50,if(i素数(v[v]+n)&&!vecsearch(vecsort(v),n),v=concat(v,n);n=0);n++);v(v)\\德里克·奥尔2015年6月1日
(PARI)U=-a=1;向量(100,k,k=估值(1+U+=1<<a,2);while(bittest(U,k)||!i素数(a+k),k++);a=k)\\M.F.哈斯勒2020年2月11日
|
|
交叉参考
|
|
|
关键词
|
容易的,美好的,非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
已批准
|
|
|
|
|
A051252号
|
| 围绕一个圆排列数字1到2n的不同方式,使每对相邻数字的和为素数。 |
|
+10 26
|
|
|
1, 1, 1, 2, 48, 512, 1440, 40512, 385072, 3154650, 106906168, 3197817022, 82924866213, 4025168862425, 127854811616691
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
偏移
|
1,4
|
|
评论
|
贾德·麦克拉尼据报道,他能够在几秒钟内找到每一个n≤225(2n≤450)的解2002年7月5日
有证据证明这总是可以做到的吗?
此序列的Mathematica程序使用回溯来查找给定n的所有解。为了验证给定n至少存在一个解,当找到第一个解时,回溯函数将停止。已找到n≤48的解决方案-T.D.诺伊2002年6月19日
以下似乎总是会产生一个解决方案:围绕以1开头的圆圈,但在此之后始终选择适合的最大剩余数字。例如,如果n=4,则得出1、6、7、4、3、8、5、2。请参见A088643号获取有关想法的序列-保罗·博丁顿2007年10月30日
詹姆斯·蒂利(James Tilley)和斯坦·瓦根(Stan Wagon)报告称,所有不超过n=10^6的项都是非零的。查尔斯·格里特豪斯四世2016年2月5日
|
|
参考文献
|
R.K.Guy,《数论中未解决的问题》,第二版,施普林格出版社,1994年。见C1节。
|
|
链接
|
|
|
例子
|
2n=6的一种排列是1,4,3,2,5,6,这在本质上是唯一的,因此a(3)=1。
|
|
数学
|
$RecursionLimit=500;try[lev_]:=模块[{t,j},如果[lev>2n,(*则确保第一个和最后一个的和是质数*)如果[PrimeQ[soln[1]]+soln[2n]]&&soln[2]]<=soln[[2n]],(*打印[soln];*)cnt++],(*else将另一个数字附加到soln列表*)t=soln[lev-1]];对于[j=1,j<=长度[s[[t]]],j++,如果[!MemberQ[soln,s[t][[j]]];尝试[lev+1];soln[[lev]]=0]]];对于[lst={};n=1,n<=7,n++,s=表[{},{2n}];对于[i=1,i<=2n,i++,对于[j=1,j<=2n、j++,如果[i!=j&&PrimeQ[i+j],附加到[s[i]],j]]];soln=表[0,{2n}];soln[[1]]=1;cnt=0;尝试[2];附录[lst,cnt]];第一次(*T.D.诺伊*)
|
|
黄体脂酮素
|
链接(S.Sykora)中列出的(C++)
|
|
交叉参考
|
|
|
关键词
|
非n,美好的
|
|
作者
|
|
|
扩展
|
|
|
状态
|
已批准
|
|
|
|
|
|
|
3, 3, 5, 3, 5, 7, 5, 7, 5, 7, 11, 5, 7, 11, 13, 3, 5, 7, 11, 13, 3, 5, 7, 11, 13, 17, 3, 5, 7, 11, 13, 17, 19, 5, 7, 11, 13, 17, 19, 5, 7, 11, 13, 17, 19, 23, 5, 7, 11, 13, 17, 19, 23, 3, 7, 11, 13, 17, 19, 23, 3, 7, 11, 13, 17, 19, 23, 29, 3, 7, 11, 13, 17
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
偏移
|
1,1
|
|
链接
|
|
|
例子
|
|
|
数学
|
A[n_,1]:=n;
A[n_,k_]:=A[n,k]=对于[m=n-1,m>=1,m-,
如果[PrimeQ[m+A[n,k-1]]&&
FreeQ[表[A[n,j],{j,1,k-1}],m],返回[m]]];
T[n_]:=T[n]=联合[2移动平均值[
表[A[n+1,k],{k,1,n+1}],{1,1}]];
|
|
黄体脂酮素
|
(哈斯克尔)
导入数据。列表(nub,sort)
a255316 n k=a255316_tabf!!(n-1)!!(k-1)
a255316_行n=a255316_tabf!!(n-1)
a255316_tabf=映射(sort.nub)a255313_tabl
|
|
交叉参考
|
|
|
关键词
|
非n,标签
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|
|
|
|
1, 2, 3, 2, 5, 6, 5, 8, 9, 8, 11, 10, 9, 14, 15, 14, 13, 18, 17, 20, 21, 20, 23, 22, 21, 26, 25, 24, 29, 30, 29, 28, 33, 32, 35, 36, 35, 34, 39, 38, 41, 40, 39, 44, 43, 42, 41, 48, 47, 50, 51, 50, 53, 54, 53, 56, 55, 54, 53, 52, 51, 50, 63, 62, 65, 64, 63, 68, 69, 68, 67, 66, 65, 74, 75
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
偏移
|
2,2
|
|
链接
|
|
|
配方奶粉
|
a(n)=p-n,其中p=最大素数<=2n-1。
|
|
例子
|
将1,2,3,2,5加到2,3,4,5,6中,我们得到素数3,5,7,7,11。
|
|
MAPLE公司
|
|
|
黄体脂酮素
|
(哈斯克尔)
|
|
交叉参考
|
|
|
关键词
|
容易的,非n
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|
|
|
|
1, 2, 5, 13, 14, 26, 61, 63, 111, 131, 151, 153, 155, 161, 179, 295, 390, 391, 398, 425, 428, 459, 485, 656, 675, 1142, 1143, 1169, 1243, 1247, 1255, 1263, 1267, 1639, 1643, 1646, 1748, 2690, 2702, 2703, 2728, 2767, 2777, 2786, 2840, 2877
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
偏移
|
1,2
|
|
评论
|
|
|
链接
|
|
|
例子
|
对于n=4,当我们检查A088643号,Roche算法生成初始行值13、10、9、8、11、12。其余值等于中的第7行A088643号,在第13行之前的任何点上,剩余值都不等于第m行,7<m<13。因此,我们计算出13和7(“未标记长度”)之间的差值为6,这比之前的记录未标记长度长(A049478号(3) =4)由行a设置(3)=5。所以a(4)=13-彼得·穆恩,2021年8月3日(基于J.斯塔杜哈尔)
|
|
黄体脂酮素
|
(PARI){print1(m=0);对于(n=1,oo,my(r=A088643号_第(n)行);对于(g=1,#r-1,如果(集(r[1..g])==[n-g+1..n]&r[g+1]==n-g,g>m&&print1(“,”n)+m=g;中断))}\\M.F.哈斯勒2021年8月4日
|
|
交叉参考
|
|
|
关键词
|
非n,美好的
|
|
作者
|
|
|
扩展
|
|
|
状态
|
已批准
|
|
|
搜索在0.014秒内完成
|