%I#18 2022年8月2日17:29:55
%S 1,4,8,9,14,15,16,18,20,21,24,25,26,27,30,32,33,35,36,38,39,42,44,46,
%电话:49,50,51,55,57,60,62,64,65,66,68,69,70,72,74,77,78,81,84,85,86,87,91,
%电话:92,93,94,95,98100102105106110111112114115116119121122
%素数因子之和(以重数计算)不是素数的数字。
%C第一项是1,因为1没有素因子,所以素因子的总和为零。
%C推测:a(n)~n.-Charles R Greathouse IV_,2015年4月28日
%H Hieronymus Fischer,n的表,n=1..10000时的a(n)</a>
%e a(2)=4,因为4=2*2和2+2=4不是素数。
%e a(5)=14,因为14=2*7和2+7=9不是素数。
%t选择[范围[150],!PrimeQ[Total[Flatten[Table[#[[1]],#[[2]]]&/@FactorInteger[#]]]&](*哈维·P·戴尔,2021年7月5日*)
%o(PARI)sopfr(n)=我的(f=系数(n));和(i=1,#f~,f[i,1]*f[i、2])
%o是(n)=!isprime(sopfr(n))\\_Charles R Greathouse IV_,2015年4月28日
%Y参见A000040、A001222、A100118、A046363、A133620、A1336321、A133880、A133.90、A133900、A133910、A1133911、A046346、A134331、A134323、A13433、A13433.4、A134344、A078177。
%K非n
%O 1,2号机组
%2007年10月23日,A _铁杉
%E作者根据T.D.Noe_的建议编辑,2013年5月20日
|