%I#17 2019年1月26日14:28:46
%S 1,3,7,13,311,5110114631133221360891038211320320383633,
%电话1438221761922463143862374506441198748230245755138679108629,
%电话:11814707168814791878662324911232883672234257764196457309
%N记录设置函数q(N)的N,使N(q+1)-1为素数p的最小素数q(即,对于所有0<j<N,q(N)>q(j))。
%H Amiram Eldar,<a href=“/A0060424/b060424.txt”>n表,a(n)表示n=1..39</a>
%H Matthew M.Conroy,<a href=“https://cs.uwaterloo.ca/journals/JIS/VOL4/CONROY/CONROY.html“>与Schinzel猜想相关的序列,J.Integ.Seqs.Vol.4(2001),#01.1.7。
%e a(3)=7,因为q(7)=5,q(j)<5表示0<j<7。
%tq[n_]:=模[{p=2},而[!素数q[n*(p+1)-1],p=下一素数[p]];p] ;记录=0;a[0]=0;a[n]:=a[n]=对于[k=a[n-1]+1,True,k++,如果[q[k]>记录,则记录=q[k];打印[k];返回[k]]];表[a[n],{n,1,32}](*Jean-François Alcover_,2013年11月18日*)
%Y参考A060324。q和p的相应值见A062252和A062256。
%K nonn公司
%O 1,2号机组
%马修·康罗伊,2001年4月10日
|