%I#18 2023年7月23日02:08:39
%第1,4,8,16,32,3610012819625640057667612961600291631364356页,
%电话:5476705681008192883612100134561440015376158761690017956,
%电话:213162250024336256002890039763240033856416164243644100
%N至少有一个素数邻居的完美幂。
%如果K是一个项,K-1是相邻的素数,那么它一定是梅森素数。
%C猜想:序列是无限的。
%H Harvey P.Dale,n表,n=0..321的a(n)
%t连接[{1},选择[Range[45000],GCD@@FactorInteger[#][[All,2]]>1&&AnyTrue[#+{1,-1},PrimeQ]&]](*需要Mathematica版本10或更高版本*)(*Harvey P.Dale_,2020年11月5日*)
%Y A001597的子序列。
%Y参考A088256、A088257和A088258。
%K nonn公司
%0、2
%A _Amarnath Murthy,2003年9月27日
%E由雷·钱德勒修正和扩展,2003年9月28日