登录
OEIS由支持
OEIS基金会的许多慷慨捐赠者
.
提示
(来自的问候
整数序列在线百科全书
!)
A178029号
除数和等于反除数和的数字。
6
11, 22, 33, 65, 82, 117, 218, 483, 508, 537, 6430, 21541, 117818, 3589646, 7231219, 8515767, 13050345, 47245905, 50414595, 104335023, 217728002, 1217532421, 1573368218, 1875543429, 2269058065, 11902221245, 12196454655, 12658724029
(
列表
;
图表
;
参考
;
听
;
历史
;
文本
;
内部格式
)
抵消
1,1
链接
n=1..28时的n,a(n)表。
配方奶粉
{编号:
A066417号
(n)=
A000203号
(n) }。
-
R.J.马塔尔
2010年5月24日
例子
6430在序列中,因为除数之和是1+2+5+10+643+1286+3215+6430=11592
它等于反除数3+4+7+9+11+20+77+167+1169+1429+1837+2572+4287=11592的和。
21541在序列中,因为除数之和是1+13+1657+21541=23212
等于反除数2+3+9+26+67+643+3314+4787+14361=23212的和。
MAPLE公司
使用(数字理论):P:=proc(q)局部j,k;
k:=0;
j:=q;
而jmod2<>1做k:=k+1;
j:=j/2;
od;
如果σ(q)=σ(2*q+1)+sigma(2*q-1)+σ(q/2^k)*2^(k+1)-6*q-2,则q;
fi;
结束:seq(P(i),i=3..10^5);
#替代Maple实施:
抗毒剂:=proc(n)局部a,k;
a:={};
对于从2到n-1的k,如果abs((n mod k)-k/2)<1,那么a:=并集{k};
结束条件:;
结束do:a;
结束过程:
A066417号
:=proc(n)加(d,d=抗病毒剂(n));
结束进程:
isA178029:=过程(n)数量[sigma](n)=
A066417号
(n) ;
结束进程:
对于1中的n,如果是A178029(n),则执行printf(“%d,\n”,n);
结束条件:;
结束do:
#
R.J.马塔尔
2010年5月24日
数学
抗分裂剂[n_]:=选择[Range[2,n-1],Abs[Mod[n,#]-#/2]<1&];
对于[k=1,k<=10^5,k++,如果[DivisorSigma[1,k]==总[antidivisors[k]],打印[k]]](*
Jean-François Alcover公司
,2023年6月14日*)
黄体脂酮素
(Python)
从sympy导入除数
[n代表范围(1,10**5)中的n,如果和([d代表范围(2,n)中的d,如果[d-1,0,1]]中的(n%d)和(2*n)%d)==和(除数(n))]#
柴华武
2014年8月7日
交叉参考
囊性纤维变性。
A000203号
,
A066272号
,
A066417号
.
上下文中的序列:
A004940号
A367339型
A065816号
*
A273992型
A283927号
239018加元
相邻序列:
A178026号
A178027号
A178028号
*
A178030号
A178031号
A178032号
关键词
非n
作者
保罗·拉瓦
和
乔治·巴尔扎罗蒂
2010年5月19日
扩展
a(13)-a(28)来自
多诺万·约翰逊
2010年6月12日
状态
经核准的