%I#21 2022年5月2日17:29:00

%S 896891074413679573680217252098037498325839195111070753，

%电话：13151511333027135348714149131843357200191120380392201273，

%电话：220778322695373235669923567632670817269684327150712717929273149329068729718413032467317732217

%N个素数与相邻素数都有立方体素数间隙。

%C到质数669763117，所有间隙都是8和64或64和8。Prime 669763117是第一个差距为8和216的。可能的间隙必须在A016743中。

%H Karl-Heinz Hofmann，n的表格，n=1..10000的a（n）</a>

%e a（2）=107441；前一个素数是107377，间隙是64（一个立方体）；下一个素数是107449，差距是8（也是一个立方体）。

%p iscube:=proc（n）选项记忆；是（n=iroot（n，3）^3）结束：

%pq:=n->ispube（n）和andmap（iscube，[n-prevprime（n），next-prime（n）-n]）：

%p选择（q，[$3.3500000）[]；#_阿洛伊斯·海因茨，2022年4月25日

%t p=素数[范围[3*10^5]]；pos=位置[差异[p]，_？(整数Q@Surd[#，3]&）]//展平；p[[pos[[Position[Differences[pos]，1]//Flatten]]+1]]（*_Amiram Eldar_，2022年4月26日*）

%o（Python）从sympy导入筛选中作为p

%o def A016743（图腾）：return（图腾%2==0和round（图腾**（1/3））**3==图腾）

%o打印（如果A016743（p[n]-p[n-1]）和A016743（p[n+1]-p[n]）]，则范围（2235000）内的n为[p[n]）

%Y参见A000040、A000578、A016743、A353088（方形间隙）、A163112（间隙>20）。

%Y参考A353137（间隙是2的幂），A353135（斐波那契间隙）。

%Y参考A353136（三角形数字间隙）。

%K nonn公司

%O 1，1

%A _Karl-Heinz Hofmann，2022年4月25日