%I#11 2024年3月23日22:12:46
%S 1,2,4,6,8,9,10,12,14,15,16,18,20,21,22,24,25,27,28,30,32,33,34,36,40,
%电话42、44、45、46、48、50、51、52、54、55、56、60、62、63、64、66、68、70、72、75、76、78、80,
%U 81,82,84,85,88,90,92,93,96,98,99100102104105108110单位
%N个正整数,除数(A000005)多于素数指数的不同除数(A370820)。
%C n的素数指数是一个数m,素数(m)除以n。n的多素数指数集是A112798的第n行。
%F A000005(a(n))>A370820(a(n))。
%e 814的素数指数为{1,5,12},有8个因子(1,2,1,22,37,74407814)和7个素数指数的不同因子(1,2,3,4,5,6,12),因此814在序列中。
%e 1859的素数指数为{5,6,6},素数指数有6个因子(1,11,131431691859)和5个不同的因子(1,2,3,5,6),因此1859在序列中。
%e条款及其主要指数开始于:
%e1:{}
%e2:{1}
%e4:{1,1}
%e 6:{1,2}
%e8:{1,1,1}
%e 9:{2,2}
%e 10:{1,3}
%e 12:{1,1,2}
%e 14:{1,4}
%e 15:{2,3}
%e 16:{1,1,1,1}
%e 18:{1,2,2}
%e 20:{1,1,3}
%e 21:{2,4}
%e 22:{1,5}
%e 24:{1,1,1,2}
%e 25:{3,3}
%e 27:{2,2,2}
%e 28:{1,1,4}
%e 30:{1,2,3}
%t选择[Range[100],Length[Divisors[#]]>Length[联合@@Divisors/@PrimePi/@First/@If[#==1,{},FactorInteger[#]](&])
%Y对于LHS上的素因子,我们有A370348,按A371171计算。
%Y对于素因子而不是除数A303975,RHS是A370820。
%对于(等于)而不是(大于),我们得到A371165,由A371172计算。
%Y对于(小于)而不是(大于),我们得到A371166。
%Y其他等式:A319899、A370802(A371130)、A371128、A371177(A371 178)。
%Y其他不等式:A371168(A371173)、A371169、A371170。
%Y A000005计算除数。
%Y A001221计算不同的素因子。
%Y A027746列出了基本因子、A112798指数、长度A001222。
%Y A239312统计可除数分区,排名A368110。
%Y A355731计算每个质数指数除数的选择,第一个是A355732。
%Y A370320统计非除数可选择分区,排名为A355740。
%Y A370814计算除数可选择因子分解,补足A370813。
%Y参见A000792、A003963、A355529、A355739、A3550741、A368100、A370808、A371127。
%K非n
%O 1,2号机组
%A _古斯·维塞曼_,2024年3月14日
|