%I#8 2014年4月19日19:16:58

%编号13,19,311932122232292713315716196917397518539911009，

%电话：1039105112311303132115491741178918311993199920292089，

%电话：2113214322032112255126832749285131213259333135713631382338534093

%N素数p，使得（p^3+2）/3是素数。

%H K.D.Bajpai，n的表格，n=1..8879的a（n）</a>

%e13是素数，并且出现在序列中，因为（13^3+2）/3=733是素数。

%e31是素数，并且出现在序列中，因为（31^3+2）/3=9931是一个素数。

%p KD:=proc（）局部a，b；a： =ithprime（n）；b： =（a^3+2）/3；如果b=楼层（b）和首字母（b），则返回（a）；fi；结束：seq（KD（），n=1..1000）；

%t选择[Prime[范围[500]]，PrimeQ[（#^3+2）/3]&]

%t n=0；Do[If[PrimeQ[（Prime[k]^3+2）/3]，n=n+1；打印[n，“”，质数[k]]]，{k，1，200000}]（*b-file*）

%o（PARI）s=[]；forprime（p=28000，如果（（p^3+2）%3==0&&isprime（（p^3+2）/3），s=concat（s，p））；2014年4月16日，科林·巴克

%Y参考A109953（素数p:（p^2+1）/3是素数）。

%Y参考A118915（素数p:（p^2+5）/6是素数）。

%Y参考A118918（素数p:（p^2+11）/12是素数）。

%Y参考A241101（素数p:（p^3-4）/3是素数）。

%K nonn公司

%O 1,1号机组

%A _K.D.Bajpai，2014年4月16日