登录
OEI由许多慷慨的捐赠者给OEIS基金会.

 

标志
提示
(问候来自整数序列在线百科全书!)
搜索: a303358-编号:a303358
显示找到的1个结果中的1-1个。 页码1
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
A303359型 双酉近完全数:双酉富余数k,使得丰度d=bsigma(k)-2*k是k的双酉因子,其中bsigma(k)是k的双酉因子之和(A188999). +10个
2
24、40、56、80、88、104、120、224、360、432、672、832、992、1008、1296、1456、1504、1584、1888、1952、2016、2160、2800、3800、5624、5800、7424、7616、9112、10080、11096、13736、15872、16256、17816、22848、24448、28544、30592、32128、33728、51136、62464、66368 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

1,1

评论

双酉版本邮编:A181595.

链接

阿米拉姆埃尔达,n=1..183的n,a(n)表

例子

24在序列中,因为它的双酉因子之和是1+2+3+4+6+8+12+24=60,而60-2*24=12是24的双酉因子。

数学

f[n_x]:=选择[除数[n],函数[d,CoprimeQ[d,n/d]]];#,最后@交叉口[f@,f[m/#]==1&];双单位除数q[divŠ,n_]:=如果[Mod[#2,#1]==0,最后@应用[交集,映射[选择[除数[#],函数[d,CoprimeQ[d,#/d]]&,{1,#2/#1}]]==1,False]&@@@{div,n};aQ[n_9]:=模[{d=bsigma[n]-2n},如果[d<=0,假,双单位除数q[d,n]]];s={};Do[如果[aQ[n],追加到[s,n]],{n,1,10000}];s

黄体脂酮素

(PARI)udivs(n)={my(d=除数(n));选择(x->(gcd(x,n/x)==1),d);}

gcud(n,m)=vecmax(setintersect(udivs(n),udivs(m));

biudivs(n)=选择(x->(gcud(x,n/x)==1),除数(n));

isok(n)=我的(divs=biudivs(n),sig=vecsum(divs));(sig>2*n)和向量搜索(divs,sig-2*n)\\米歇尔·马库斯2018年4月27日

交叉引用

囊性纤维变性。A153501号,邮编:A181595,A188999,A292982年,A303358飞机.

关键字

作者

阿米拉姆埃尔达迈克尔·德维列格2018年4月22日

状态

经核准的

页码1

搜索在0.003秒内完成

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

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

上次修改时间:2022年10月6日10:58。包含357263个序列。(运行在oeis4上。)