%I#41 2017年11月20日03:30:52

%S 2,2,3,2,3,2,5,2,5,2,3,7,2,3,2,3,2,5,2,3,5,2,5,2,5,5,2,5,3,3,3,2,5,2,5,3,3,2,5,2,13,3,3,2，

%温度3,2,11,2,5,5,3,3,5,2,3,2,2,5,3,19,5,7,2,3,12,5,2,7,11,3,2,5，

%U 3.11,5,3,5,13,5,2,3,2,7,2,7,1,5,7,5,3,17,7,3,3,2,3,12,5,5

%N a（N）是最小素数q，使得N*（q+1）-1是素数，也就是说，最小素数q，使得N=（p+1）/（q+1）与p素数；如果不存在这样的q，则a（n）=-1。

%C Schinzel的一个猜想，如果是真的，就意味着这样的q总是存在的。

%H T.D.Noe，n的表格，n=1..10000的a（n）</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。

%H Peter Luschny，Schinzel-Sierpinski猜想和Calkin-Wilf树</a>

%F a（n）=（A062251（n）+1）/n-1.-_Reinhard Zumkeller，2014年8月28日

%e1=（2+1）/（2+1”），则第一项为2；3（2+1）-1=8不是素数，而3（3+1）-1=11是素数（3=（11+1）/（3+1。

%p a：=proc（n）局部q；

%pq:=2；

%p while not is素数（n*（q+1）-1）do

%pq：=下一素数（q）；

%p od；q个

%p端：

%p序列（a（n），n=1..300）；#_Alois P.Heinz，2011年2月11日

%t a[n_]：=（q=2；而[！素数q[n*（q+1）-1]，q=下一素数[q]]；q） ；a/@Range[100]（*_Jean-François Alcover_，2011年7月20日，在Maple项目之后*）

%o（哈斯克尔）

%o a060324 n=头部[q | q<-a000040_列表，a010051'（n*（q+1）-1）==1]

%o——Reinhard Zumkeller，2014年8月28日

%o（PARI）a（n）={my（q=2）；while（！isprime（n*（q+1）-1），q=下一个prime（q+1

%Y参考A060424。A062251中给出了p的值。

%Y参考A000040、A010051。

%K nonn，很好，很容易

%O 1,1号机组

%A _马修·康罗伊，2001年3月29日