|
|
A007340号 |
| 除数的调和平均数和算术平均数都是整数的数字。 (原名M4299)
|
|
18
|
|
|
1, 6, 140, 270, 672, 1638, 2970, 6200, 8190, 18600, 18620, 27846, 30240, 32760, 55860, 105664, 117800, 167400, 173600, 237510, 242060, 332640, 360360, 539400, 695520, 726180, 753480, 1089270, 1421280, 1539720, 2229500, 2290260, 2457000
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
|
|
参考文献
|
G.L.Cohen,个人沟通。
理查德·盖伊(Richard K.Guy),《数论中未解决的问题》(Unsolved Problems in Number Theory),第3版,斯普林格出版社,2004年,B2部分,第74-84页。
N.J.A.Sloane,序列M4299的图解(=A007340号)《整数序列百科全书》(与西蒙·普劳夫合著),学术出版社,1995年。
N.J.A.Sloane和Simon Plouffe,《整数序列百科全书》,学术出版社,1995年(包括该序列)。
D.威尔斯,《好奇而有趣的数字》,企鹅图书,第124页。
|
|
链接
|
|
|
配方奶粉
|
a=西格玛(1,x)/西格玛(0,x)整数,b=x/a。
|
|
例子
|
x=270:西格玛(0.270)=16,西格马(1.270)=720;平均除数a=720/16=45和整数45除以x,x/a=270/45=6,但270不在A007691号.
|
|
MAPLE公司
|
过滤器:=进程(n)
使用数字理论;
局部a;
a: =西格玛(n)/西格玛[0](n);
类型(a,整数)和类型(n/a,整数);
结束过程:
选择(过滤器,[1..2500000]美元)#罗伯特·伊斯雷尔2014年10月26日
|
|
数学
|
Do[a=DivisorSigma[0,n]/DivisorSigma[1,n];如果[IntegerQ[n*a]&&IntegerQ[1/a],打印[n]],{n,1,2500000}](*拉博斯·埃利默*)
ahmQ[n_]:=模[{dn=Divisors[n]},整数Q[Mean[dn]]&&IntegerQ[HarmonicMean[dn]];选择[Range[2500000],ahmQ](*哈维·P·戴尔2011年11月16日*)
|
|
黄体脂酮素
|
(哈斯克尔)
a007340 n=a007340_列表!!(n-1)
a007340_list=过滤器(==0)。a054025)a001599_列表
(PARI)是(n)=my(d=除数(n),s=向量(d));s%#d==0&&#d*n%s==0\\查尔斯·格里特豪斯四世2017年2月7日
|
|
交叉参考
|
|
|
关键词
|
非n,美好的
|
|
作者
|
|
|
扩展
|
|
|
状态
|
已批准
|
|
|
|