%I#7 2016年10月12日02:49:55
%S 1,3,3,1,1,3,4,1,7,3,5,3,3,1,1,6,6,1,1,3,3A,5,7,1,7,1,1,4,3,4,4,
%T 1,1,3,4,6,4,4,3,6,9,5,3,3,1,3,6,5,1,6,4,4,4,3,4,3,4,7,5,6,5,
%U 1,7,7,7,10,10,4,5,4,3,7,3,3,4,6,1,5,5,3,9,1,3,4],3,6,3,6
%N a(N)=(下一个质数(12*N)-上一个质素(12*N))/2。
%如果12n-/+1是双素数,则C a(n)=1。对应的n在A124519中:1,5,6,9,15,16,19,20,26,29,35,36,50,。。。
%H G.C.Greubel,n表,n=1..1000时的a(n)</a>
%t表[(NextPrime[12*n,1]-NextPrime[12],-1])/2,{n,1,25}](*_G.C.Greubel_,2016年10月11日*)
%o(PARI)a(n)=(nextprime(12*n)-preprime(12*n))/2;\\_米歇尔·马库斯(Michel Marcus),2016年10月12日
%Y参考A124519,A135023。
%K nonn公司
%O 1,2号机组
%A_Zak Seidov,2008年2月17日
|