%I M4299#69 2022年4月19日07:26:50
%S 1,614027067216382970620081901860018620278463024032760,
%电话:5586010566411700167400173600237510242060332640360360539400,
%电话:695520726180753480108927014212801539720222950022902602457000
%N除数的调和平均数和算术平均数都是整数的数。
%C A001599和A003601的交叉口。
%C A046985:1、6、672、30240、32760中也包含以下内容。还包含乘法完全数(A007691)_拉博斯·埃利默_
%平均除数也是除数的数字。Ore的调和数A001599,没有数字A046999_托马斯·奥多夫斯基,2014年10月26日,2022年4月17日
%C调和数k,其除数的调和平均值(A001600)也是k.-阿米拉姆·埃尔达尔的除数,2022年4月19日
%D G.L.Cohen,个人沟通。
%D Richard K.Guy,《数论中未解决的问题》,第3版,Springer,2004年,B2部分,第74-84页。
%D N.J.A.Sloane,《整数序列百科全书》中序列M4299(=A007340)的图解(与Simon Plouffe合著),学术出版社,1995年。
%D N.J.A.Sloane和Simon Plouffe,《整数序列百科全书》,学术出版社,1995年(包括该序列)。
%D·D·威尔斯,《好奇而有趣的数字》,企鹅出版社,第124页。
%H Donovan Johnson,n的表,n的a(n)=1..847</a>
%H G.L.Cohen,<a href=“/A007340/A007340.pdf”>给N.J.a.Sloane的电子邮件,1994年4月</a>
%H T.Goto和S.Shibata,<a href=“http://dx.doi.org/10.1090/S0025-5718-03-01554-0“>所有正除数具有整数调和平均值的数字,最高可达300</a>,《数学计算》73(2004),475-491。
%H Hisanori Mishima,<a href=“http://www.asahi-net.or.jp/~KC2H-MSM/mathland/matha1/matha138.htm“>许多数字序列的因子分解</a>
%H Oystein矿石,<a href=“http://www.jstor.org/stable/2305616“>关于数字除数的平均值,Amer.Math.Monthly,55(1948),615-619。
%F a=西格玛(1,x)/西格玛(0,x)整数,b也=x/a。
%e x=270:西格玛(0.270)=16,西格马(1.270)=720;平均除数a=720/16=45和整数45除以x,x/a=270/45=6,但270不在A007691中。
%p过滤器:=程序(n)
%p使用数字理论;
%p局部a;
%p a:=西格玛(n)/西格玛[0](n);
%p类型(a,整数)和类型(n/a,整数);
%p端程序:
%p选择(过滤器,[1..2500000]);#_罗伯特·伊斯雷尔,2014年10月26日
%t Do[a=DivisorSigma[0,n]/DivisorSigma[1,n];如果[IntegerQ[n*a]&&IntegerQ[1/a],打印[n]],{n,1,2500000}](*_Labos元素_*)
%t ahmQ[n_]:=模[{dn=Divisors[n]},整数Q[Mean[dn]]&&IntegerQ[HarmonicMean[dn]];选择[Range[2500000],ahmQ](*哈维·P·戴尔,2011年11月16日*)
%o(哈斯克尔)
%o a007340 n=a007340_列表!!(n-1)
%o a007340_list=过滤器((==0)。a054025)a001599_列表
%o——Reinhard Zumkeller,2013年12月31日
%o(PARI)是(n)=my(d=除数(n),s=向量(d));s%#d==0&#d*n%s==0\\夏尔斯R Greathouse IV_,2017年2月7日
%A003601和A001599的Y交点。
%Y与A090945不同。
%Y参见A001600、A007691、A046985-A046987、A046999、A054025。
%K nonn很好
%O 1,2号机组
%A _N.J.A.斯隆_
%E更多术语摘自Robert G.Wilson v_,2002年10月3日
%E根据R.J.Mathar的建议,由N.J.A.Sloane编辑,2008年10月5日_
|