登录
OEIS由OEIS基金会的许多慷慨捐助者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A103339号 正整数n的酉调和平均数(即酉除数的调和平均数)的分子。 10
1、4、3、8、5、2、7、16、9、20、11、12、13、7、5、32、17、12、19、8、21、22、23、8、25、52、27、14、29、10、31、64、11、68、35、72、37、38、39、80、41、7、43、44、3、23、47、48、49、100、17、104、53、18、55、28、57、116、59、4、61、31、63、128、65、11、67、136、23、35、71、16、73 (列表图表参考历史文本内部格式)
抵消
1,2
链接
莱因哈德·祖姆凯勒(Reinhard Zumkeller),n=1..10000时的n,a(n)表
配方奶粉
一个(A006086号(n) )=A006087号(n) -莱因哈德·祖姆凯勒2012年3月17日
发件人阿米拉姆·埃尔达尔,2023年3月10日:(开始)
a(n)/A103340号(n) =个*A034444号(n)/A034448号(n) ●●●●。
a(n)/A103340号(n)<=A099377号(n)/A099378号(n) ,等式当且仅当n是平方自由的(A005117号). (结束)
例子
1, 4/3, 3/2, 8/5, 5/3, 2, ...
a(8)=16,因为8的幺正因子是{1,8}和2/(1/1+1/8)=16/9。
MAPLE公司
with(numtheory):audivisors:=proc(n)local A,k:A:={}:对于k从1到tau(n)do,如果gcd(除数(n)[k],n/divitors(n)[k])=1,那么A:=A并{除数(n)[k]}其他A:=F末端:utau:=n->nops(audivisor(n)):usigma:=n->总和:=n->n*utau(n)/usigma(n):序列(数字(uH(n)),n=1..81);
数学
ud[n_]:=2^PrimeNu[n];usigma[n_]:=除数和[n,如果[GCD[#,n/#]==1,#,0]&];a[1]=1;a[n_]:=分子[n*ud[n]/usigma[n]];数组[a,100](*Jean-François Alcover公司2016年12月3日*)
a[n_]:=分子[n*Times@@(2/(1+Power@@@FactorInteger[n]))];a[1]=1;数组[a,100](*阿米拉姆·埃尔达尔2023年3月10日*)
黄体脂酮素
(哈斯克尔)
导入数据。比率(%),分子)
a103339=分子。uhm,其中uhm n=(n*a034444 n)%(a034448 n)
--莱因哈德·祖姆凯勒2012年3月17日
(Python)
从sympy导入gcd
从sympy.theory.factor导入审核sigma
定义A103339号(n) :return(λx,y:y*n//gcd(x,y*n))#柴华武2021年10月20日
(PARI)a(n)={my(f=因子(n));分子(n*prod(i=1,#f~,2/(1+f[i,1]^f[i、2]));}\\阿米拉姆·埃尔达尔2023年3月10日
交叉参考
囊性纤维变性。A103340号(分母),A099377号,1993年.
关键词
压裂,非n
作者
Emeric Deutsch公司2005年1月31日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年4月19日19:02。包含371798个序列。(在oeis4上运行。)