%I#10 2023年10月9日09:24:18
%S 1,3,5,7,11,13,15,17,19,21,23,27,29,31,33,35,37,39,41,43,45,47,49,51,
%电话:53,55,57,59,61,65,67,69,71,73,77,79,83,85,87,89,91,93,95,97,99101,
%电话:103105107109111113115119123127129131133135137139141
%N数m,使得m的除数的算术平均数Ad(m)和数1<=k<=m的算术平均值Ak(m)都是整数。
%C数字m,使得Ad(m)=A000203(m)/A000005(m)=A057020(m”)/A057021(m)和Ak(m)=0.000217(m)/A000027(m)=145051(m)/A 040001(m)都是整数。
%C A003601的子序列:{a(n)}=来自A003601.的奇数。
%C{a(n)}联合A175678=A003601(算术数)。
%C From _Robert G.Wilson v_,2010年8月9日:(开始)
%C所有项都是奇数,因为第二个标准等价于n | T(n),其中T(n”)是第n个三角形数A000217(n)。
%C非素数项为1、15、21、27、33、35、39、45、49、51、55、57、65、69、77、85。
%C非项的奇整数:9,25,63,75,81,117,121,171,175,225,243,279,289。(结束)
%e a(4)=7,Ad(7)=(1+7)/2=4,Ak(7)=(1+2+3+4+5+6+7)/7=4,Ad。
%t fQ[n]:=奇数Q@n&&Mod[DivisorSigma[1,n],DivisorSigma[0,n]]==0;选择[Range@142,fQ](*_Robert G.Wilson v_,2010年8月9日*)
%K nonn公司
%O 1,2号机组
%2010年8月7日,雅罗斯拉夫·克里泽克
%E更多条款摘自Robert G.Wilson v_,2010年8月9日