%I#32 2022年7月3日06:46:50

%S 129610000384165062519448123425645697618592113363361500625，

%电话：2085136231344144774566765201915062510556001131649614776336，

%电话：1677721617850622522676212129986576351530414521217652200625

%N带25个除数的数字。

%C Maple实现：参见A030513。

%C形式为p^24（A000040的24次幂，A010812的子集）或p^4*q^4（A189991）的数字，其中p和q是不同的素数_R.J.Mathar，2010年3月1日

%H T.D.Noe，<a href=“/A137488/b137488.txt”>n的表，a（n）表示n=1..1000</a>

%F A000005（a（n））=25。

%F和{n>=1}1/a（n）=（P（4）^2-P（8））/2+P（24）=0.000933328…，其中P是素数zeta函数_Amiram Eldar，2022年7月3日

%t lst={}；Do[If[DivisorSigma[0]，n]==25，打印[n]；附加到[lst，n]]，{n，55000000}]；第1页（*_Vladimir Joseph Stephan Orlovsky，2011年5月3日*）

%t选择[Range[5221*10^4]，DivisorSigma[0，#]==25&]（*_哈维P.Dale_，2019年3月11日*）

%o（哈斯克尔）

%o a137488 n=a137488_列表！！（n-1）

%o a137488_list=m（map（^24）a000040_list）（映射（^4）a006881_llist），其中

%o m xs'@（x:xs）ys'@（y:ys）|x<y=x:m xs-ys'

%o|否则=y:m xs'ys

%o--_Reinhard Zumkeller_2011年11月29日

%o（PARI）is（n）=numdiv（n）==25 2016年6月19日

%Y参见A000005、A010812、A030513-A030516、A030626、A03062/A0306638、A005179、A003680、A096932、A061286、A0612803、A135581、A175755。

%K nonn公司

%O 1，1

%A R.J.Mathar_，2008年4月22日