%I#12 2013年10月1日21:35:29

%S 2,13,11,2,5,3,19,17,2,7,5107,23101,1,11,5,3257,29,71,2,17,11,3,43，

%电话：41,37467,31,17,13,7,5,471731671601,2,23,17719,5,59701113,2，

%U 29347,23,17,83,5,67,61131,53,47,43,41,31,17,13,11,7569239,53227,47,2

%N a（N）=使p+素数（N）为平方的最小素数p。

%H Zak Seidov，n的表，n的a（n）=1..10000</a>

%素数3和平方16之间的差是13，这是序列中的素数。

%t表[p=素数[n]；b=天花板[Sqrt[p]]；而[！素数Q[x=b^2-p]，b++]；x、 {n，72}]

%o（PARI）g（n）=c=0；对于素数（x=2，n，对于（k=1，n^2，if（issquare（x+k）&isprime（k），

%o打印1（k“，”）；c++；断裂）；c（c）

%K nonn公司

%O 1,1号机组

%2009年3月1日，A Clino Hilliard

%E更好的定义和Mma计划，来自Zak Seidov，2013年3月14日