%I#17 2023年3月4日08:56:15
%S 5,7,13,13,31,19,29,97,37,31,67,37,53,43,61,97103,73229,61127,67,
%电话139,73101,79109113233181373,97199103211109149229157241,
%电话:7391271733531811392831971513071577431633337229
%N取最小素数q,使得N*(q+1)+1是素数(A249800),也就是说,最小素数q,使得N=(p-1)/(q+1)具有p个素数;序列给出p的值;如果A249800(n)=-1,则为-1。
%辛泽尔假设的变化。
%H Paolo P.Lava,n表,n=1..1000时的a(n)</a>
%H Eric Weisstein的数学世界,<a href=“http://mathworld.wolfram.com/SchinzelsHypothesis.html“>Schinzel假设。
%e对于n=1,最小素数p和q是5和3:(p-1)/(q+1)=(5-1)/(3+1)=4/4=1。因此,a(1)=5。
%e对于n=2,最小素数p和q是7和2:(p-1)/(q+1)=(7-1)/(2+1)=6/3=2。因此a(2)=7。等。
%p与(numtheory):p:=proc(q)局部k,n;
%p代表n从1到q do代表k从1到qdo
%p如果是素数(n*(ithprime(k)+1)+1),则打印(n*;
%p断裂;fi;od;od;结束:P(10^5);
%o(PARI)a(n)=我的(q=2);while(!i素数(p=n*(q+1)+1),q=下一素数(q+1));p、 \\_Michel Marcus,2014年11月7日
%Y参见A060324、A062251、A064632、A249800、A249802-A249803。
%K nonn,简单
%O 1,1号机组
%2014年11月6日,A_Paolo P.Lava
|