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

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: 电话:a303358
显示1-1个结果(共1个)。 第页1
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
A303358型 双优亏完全数:双优亏数k,其中2*k-bsigma(k)是k的双优除数,其中bsigma(A188999号). +0个
2
1, 2, 8, 10, 12, 32, 112, 128, 136, 144, 152, 184, 512, 1088, 2048, 2144, 2272, 2528, 2736, 3248, 3312, 4592, 7936, 8192, 9800, 11800, 17176, 18632, 18904, 22984, 32768, 32896, 33664, 34688, 49024, 57152, 77248, 85952, 131072, 176400, 212400, 309168, 335376 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
双总统版本的A271816型.
包括2的所有奇数幂(A004171号).
链接
阿米拉姆·埃尔达尔,n=1.171时的n,a(n)表
例子
112位于序列中,因为它的双优除数之和是1+2+7+8+14+16+56+112=216,并且2*112-216=8是112的双优除数。
数学
f[n_]:=选择[Divisors[n],函数[d,互质Q[d,n/d]]];bsigma[m_]:=除数和[m,#&,最后一个@交点[f@#,f[m/#]]==1&];双单位除数Q[div_,n_]:=如果[Mod[#2,#1]==0,上次@应用[Intersection,Map[Select[Divisors[#],Function[d,CoprimQ[d,#/d]]&,{#1,#2/#1}]==1,False]@@{div,n};aQ[n_]:=模[{d=2n-bsigma[n]},如果[d<=0,False,双单位除数Q[d,n]]];s={};做[If[aQ[n],AppendTo[s,n]],{n,1,10000}];
黄体脂酮素
(PARI)udivs(n)={my(d=除数(n));选择(x->(gcd(x,n/x)==1),d);}
gcud(n,m)=vecmax(setintersect(udivs(n),udives(m)));
biudivs(n)=选择(x->(gcud(x,n/x)==1),除数(n));
isok(n)=我的(divs=biudivs(n),sig=vecsum(divs));(sig<2*n)&&vecsearch(divs,2*n-sig)\\米歇尔·马库斯2018年4月27日
交叉参考
关键词
非n
作者
状态
经核准的
第页1

搜索在0.005秒内完成

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

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

上次修改时间:美国东部夏令时2024年3月28日16:34。包含371254个序列。(在oeis4上运行。)