%I#20 2022年3月17日13:50:53

%S 4,6,8,9,12,16,18,24,26,27,32,34,36,38,39,48,51,52,54,57,58,62,64,68，

%电话72,74,76,78,81,82,86,87,93,96102104106108111114116117122，

%电话：123124128129134142144146148152156158159162169171

%N没有“安全素数”因子的复合数。

%C A350705是一个子序列。

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

%e a（5）=12=2*2*3和{2，3}不在A005385中。

%t选择[Range[200]，CompositeQ[#]&&AllTrue[FactorInteger[#][[；；，1]]！PrimeQ[（#1-1）/2]&]&]（*_Amiram Eldar_，2022年2月20日*）

%o（PARI）isok（m）=如果（m>1）&&！i素数（m）#选择（x->i素数（（x-1）\2），因子（m）[，1]）；

%o（Python）

%o来自sympy import primefactors，isprime

%o打印（[n代表范围（4172）中的n，如果不是素数（n），则全部（非素数（（p-1）//2）代表素数（n）中的p）]）

%Y参见A350704、A350705、A005385。

%K nonn公司

%O 1,1号机组

%A _Karl-Heinz Hofmann，2022年2月20日