登录
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年
.
囊性纤维变性。
A005117号
,
A034444号
,
A034448号
,
A077610号
.
上下文中的序列:
A200345型
A021962美元
A097672号
*
A361316型
A361782飞机
A353990型
相邻序列:
A103336号
A103337号
A103338号
*
A103340号
A103341号
A103342号
关键词
压裂
,
非n
作者
Emeric Deutsch公司
2005年1月31日
状态
经核准的
查找
|
欢迎光临
|
维基
|
注册
|
音乐
|
地块2
|
演示
|
索引
|
浏览
|
更多
|
网络摄像头
贡献新序列。
或评论
|
格式
|
样式表
|
变换
|
超级搜索
|
最近
OEIS社区
|
维护人
OEIS基金会。
许可协议、使用条款、隐私政策。
.
上次修改时间:美国东部夏令时2024年4月19日19:02。
包含371798个序列。
(在oeis4上运行。)