%I#6 2020年5月8日04:42:43
%编号18,36,751002002242254415601183134419203025828126011,
%电话:346066400972030768951153511971732800414942095382651168561,
%电话:19472712927521357588136131533780295449212572954011066533111580409125112911347637515381133
%N复合数m,其中tau_k(m)=m表示某些k,其中tau _k是第k个皮尔茨除数函数(A077592)。
%C素数被排除在这个序列之外,因为对于所有素数p,tau_p(p)=p。
%C k的相应值为3、3、5、4、4、5、6、4、13、4、10、13、37、11、22、7、13、61、73、17、37、13、46、157、58、61、193、29、9、73、277、82、37、9、313。。。
%e 18为顺序,因为tau_3(18)=A007425(18)=18。
%t fun[e_,k_]:=次数@@(二项式[#+k-1,k-1]&/@e);tau[n_,k_]:=fun[FactorInteger[n][[;;,2]],k];aQ[n_]:=复合Q[n]&&模块[{k=2},而[(t=tau[n,k])<n,k++];t==n];选择[范围[10^5],aQ]
%Y参考A097989。
%Y参见A007425、A007426、A034695、A061200、A077592、A111217、A111218、A111219、A111220、A111221、A111306、A163272。
%K nonn公司
%O 1,1号机组
%A _Amiram Eldar,2019年9月25日
|