%I#9 2016年9月22日09:51:40
%S 6,10,12,18,20,22,24,30,34,36,40,44,48,50,54,58,60,66,68,72,80,82,88,
%电话:90,96100102108110116118120132136142144150154160162,
%电话:16417017417618019219820020204216220232238240242246
%对N进行编号,使最大的独立素除数和最小的独立素除数之和为素数。
%C也是最大素因子是孪生素对较小部分的数_Stefan Steinerberger_,2006年7月22日
%C经验:所有项都是偶数_Harvey P.Dale_,2016年9月22日
%H Harvey P.Dale,n的表,n=1..1000的a(n)</a>
%e如果n=6,那么最大和最小的不同素数因子是3和2,它们的和是素数。
%e如果n=90,那么最大和最小的不同素数因子是5和2,它们的和是素数。
%t选择[Range[2,500],PrimeQ[FactorInteger[#][[1,1]]+FactorIntiger[#][[-1,1]]&](*_Stefan Steinerberger_,2006年7月22日*)
%t pdQ[n_]:=模[{f=FactorInteger[n][[All,1]]},素数Q[f[[1]]+f[[-1]]];选择[范围[2300],pdQ](*_哈维·P·戴尔,2016年9月22日*)
%Y参见A119613。
%K nonn公司
%O 1,1号机组
%A _帕萨萨拉提·纳姆比,2006年6月9日
%E更多条款,来自斯泰芬·斯坦纳伯格,2006年7月22日
|