%I#10 2020年1月30日06:40:18

%S 3,2922619837929383525963775491600703930397349147753209，

%电话：7457201399870829792439903209327651791941787660891146884079，

%电话：5871431813972695416559418374010739788251653689829180295189

%形式为k^1+k^2+k^3+k^4-1的孪生素数较少。

%C k的相应值为1、2、12、30、44。。。（A156021）。

%H Amiram Eldar，n的表，a（n）表示n=1..10000</a>

%e29是一个项，因为2+2^2+2^3+2^4-1=29和2+2^2+2^3+2^4+1=31是双素数。

%t lst＝｛｝；Do[p=（n^1+n^2+n^3+n^4）；如果[PrimeQ[p1=p-1]&&PrimeQ[p2=p+1]，AppendTo[lst，p1]]，{n，8！}]；第一次

%t选择[表[n+n^2+n^3+n^4-1，{n，1000}]，AllTrue[{#，#+2}，PrimeQ]&]（*程序使用Mathematica版本10*中的AllTrue函数）（*Harvey P.Dale_，2019年12月17日*）

%Y参考A001359、A125964、A156018、A156021。

%K nonn公司

%O 1,1号机组

%A _弗拉迪米尔·约瑟夫·斯蒂芬·奥尔洛夫斯基（Joseph Stephan Orlovsky），2009年2月1日