%I M5435 N2363#86 2023年11月17日11:49:43
%第2841210292455646368108561459518416760084669927114587633页,
%电话:88730124155139815123152153176168730176336180848203432202444,
%电话:36508438992443040239959245534448617851473652591566986072
%N友好对中较大的一个。
%C元素76084、123152等故意违反数字顺序,因此a(n)和A002025(n)形成友好对_迈克尔·波特(Michael B.Porter),2010年4月17日
%C所有术语都有缺陷(A005100)_米歇尔·马库斯(Michel Marcus),2013年3月10日
%C有关相关友好配对,请参见A259180_Omar E.Pol_,2015年7月15日
%D N.J.A.Sloane,《整数序列手册》,学术出版社,1973年(包括该序列)。
%D N.J.A.Sloane和Simon Plouffe,《整数序列百科全书》,学术出版社,1995年(包括该序列)。
%D有关其他参考,请参见A002025。
%H T.D.Noe和Sergei Chernykh,n的表格,a(n)表示n=1..415523。条款39375至415523由Sergei Chernykh计算]
%H J.Bell,<a href=“http://arXiv.org/abs/math.NT/0409196“>莱昂哈德·尤勒(Leonhard Euler)《关于友好数字》(On aminable numbers)的译文,arXiv:math/0409196[math.HO],2004-2009年。
%H S.Chernykh,<a href=“http://sech.me/ap/“>友好配对列表</a>
%H E.B.Escott,友好号码,Scripta Mathematica,12(1946),61-72[带注释的扫描副本]
%H M.Garcia,<a href=“https://cs.uwaterloo.ca/journals/JIS/VOL4/GARCIA/millionc.html“>《一百万对新的友好情侣》,J.Integer Seqs.,第4卷(2001年),#01.2.6。
%H S.S.Gupta,<a href=“http://www.shyamsundergupta.com/amicable.htm“>友好的数字</a>
%H Hisanori Mishima,<a href=“http://www.asahi-net.or.jp/~KC2H-MSM/mathland/math09/ami02.htm“>首批236对友好搭档</a>
%H D.Moews,<a href=“http://djm.cc/amicable.html“>完美、友善、社交的数字</a>
%H Passawan Noppakaew和Prapanpong Pongsriam,<a href=“https://cs.uwaterloo.ca/journals/JIS/VOL26/Pongsriam/pong43.html“>一些多项式和算术函数的乘积</a>,《国际期刊》(2023)第26卷,第23.9.1条。
%H J.O.M.Pedersen,<a href=“http://amicable.homepage.dk/knwnap.htm“>已知的友好对</a>[断开的链接]
%H J.O.M.Pedersen,<a href=“http://amicable.homepage.dk/tables.htm“>等分循环表
%H J.O.M.Pedersen,<a href=“http://web.archive.org/web/20140502102524/http://amicable.homepage.dk/tables.htm“>等分周期表
%H J.O.M.Pedersen,等分周期表
%H T.Trotter,Jr.,<a href=“http://www.trottermath.net/numthry/amicable.html“>Amicable Numbers</a>[警告:截至2018年3月,该网站似乎已被黑客入侵。请谨慎操作。应从Wayback机器中检索原始内容并将其添加到此处。-N.J.a.Sloane_,2018年3月29日]
%H Eric Weisstein的数学世界,<a href=“http://mathworld.wolfram.com/AmicablePair.html“>友好搭档</a>
%F a(n)=A259180(2n)=A180164(n)-A259180(2n-1)=A18164(n)-A002025(n).-_Omar E.Pol_,2015年7月15日
%pf:=proc(t)使用数字理论;当地;
%p s:=σ(t)-t;s>t和sigma(s)-s=t
%p端程序;
%p Am1:=选择(f,[$1..10^6]);
%p映射(数字理论:-sigma,Am1);#_罗伯特·伊斯雷尔,2015年7月16日
%友好Q[n_]:=与[{s=DivisorSigma[1,n]-n},r=n!=s&&n==除数Sigma[1,s]-s;如果[r,mate[n]=s;正确,错误]];mate/@Select[Range[lim],amiableQ[#]&#<mate[#]&](*_Jean-François Alcover_,2011年9月20日*)
%t表[DivisorSigma[1,A002025[n]]-A002025[n],{n,50}](*_t.D.Noe_,2011年9月20日*)
%o(PARI)小份(n)=σ(n)-n
%o isA002046(n)={local(a);a=aliquot(n);a<n&aliquot
%Y参考A002025、A063990、A180164、A259180。
%K nonn很好
%O 1,1号机组
%A _N.J.A.斯隆_
%E更多来自Larry Reeves(larryr(AT)acm.org)的术语,2000年10月25日
|