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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A110929号 平方友好数的sigma_2的公共值,sigma_2(m)=sigma_2(n),m<n。 4
50, 850, 1300, 2210, 6100, 8500, 14500, 18100, 22100, 22100, 22100, 24650, 26500, 32550, 42500, 42100, 48100, 48100, 48100, 68500, 68900, 84100, 92500, 103700, 110500, 110500, 110500, 140500, 158600, 174100, 201110, 186100, 221000, 224500 (列表图表参考历史文本内部格式)
抵消
1,1
链接
阿米拉姆·埃尔达尔,n=1..10000时的n,a(n)表
配方奶粉
西格玛2(m)=西格玛2中(n),m<n。
例子
西格玛_2(30)=1^1+2^2+3^2+5^2+6^2+10^2+15^2+30^2=1300,西格玛_(35)=1^2+5 ^2+7^2+35^2=1300。
MAPLE公司
带有(数字理论);sigmap:=proc(p,n)convert(map(proc(z)z^p end,divisors(n)),`+`)end;SA2:=[]:对于z从1到1 do,对于m到1500 do,m:=sigmap(2,m);对于从m+1到1500的n,n:=σap(2,n);如果N=M,则SA2:=[op(SA2),[M,N,N]]fiod od;SA2;选择(proc(z)z[1]<=1000 end,SA2)#只是想把它缩短一点
数学
a[n_]:=模块[{s=DivisorSigma[2,n],ans={}},kmax=天花板[Sqrt[s]];Do[If[DivisorSigma[2,k]==s,AppendTo[ans,s]],{k,n+1,kmax}];ans];s={};Do[v=a[n];Do[AppendTo[s,v[[k]]],{k,1,Length[v]}],{n,1,400}];秒(*阿米拉姆·埃尔达尔2019年9月8日*)
交叉参考
囊性纤维变性。10926年,A110927号,A110928号.
关键词
非n
作者
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年5月6日22:30。包含372297个序列。(在oeis4上运行。)