%I#13 2019年3月20日04:25:55

%S 2,4,6,12,15,16,20,30,35,36,42,48,56,88,99112120126130135143，

%电话：14416016218019221021622022122823123142250256270275280，

%电话：28829730030832233033836039640040842943544044393

%N个数>1，可被其素数指数之和整除。

%C n的素数指数是一个数m，素数（m）除以n。n的多素数指数集是A112798的第n行。n的素数指数之和为A056239（n）。例如，99的素数指数是{2,2,5}，和是9，除数是99，所以99在序列中。

%C对于任何k>=2，设d是k的除数，使得d>A056239（k）。则2^（d-A056239（k））*k在序列中。类似地，如果k在d=A056239（k）的序列中，则2^d*k在序列中_罗伯特·伊斯雷尔，2019年3月19日

%H Robert Israel，n的表，a（n）表示n=1..10000</a>

%e术语序列及其基本指数开始于：

%e2:{1}

%e4:{1,1}

%e 6:{1,2}

%e 12:{1,1,2}

%e 15:｛2，3｝

%e 16:{1,1,1,1}

%e 20:{1,1,3}

%e 30:{1,2,3}

%e 35:{3,4}

%e 36:{1,1,2,2}

%e 42：{1,2,4}

%e 48:{1,1,1,1,2}

%e 56：{1,1,4}

%e 88：{1,1,5}

%e 99:{2,2,5}

%e 112:{1,1,1,1,4}

%e 120:{1,1,2,3}

%e 126:{1、2、2、4}

%e 130：{1,3,6}

%e 135:{2,2,2,3}

%p过滤器：=proc（n）局部t；n mod add（数字理论：-pi（t[1]）*t[2]，t=ifactors（n）[2]）=0结束进程：

%p选择（过滤器，[1..1000]）；#_罗伯特·伊斯雷尔，2019年3月19日

%t选择[Range[2100]，Divisible[#，Plus@@Cases[If[#==1，{}，FactorInteger[#]]，{p_，k_}:>PrimePi[p]*k]]&]

%o（PARI）isok（n）={my（f=因子（n））；（n！=1）&&

%Y参见A003963、A036844、A056239、A112798、A120383、A290822、A306844。

%Y请参阅A324695、A324741、A32474 3、A324847、A324756、A324458、A324765、A324 847、A4848、A324 84、A324850、A324 852。

%K非n

%O 1,1号机组

%A _古斯·维塞曼_，2019年3月18日