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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A059113号 两个不同互质平方的除数之和。 1
31, 187131, 347529, 658749, 2106853, 3969147, 4657471, 4980801, 6540807, 10185273, 20421219, 25690413, 42827421, 44136183, 51598911, 73854183, 202765017, 299457613, 307464339, 308953281, 314858271, 504081669, 516979281, 600877641, 613602549 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
链接
多诺万·约翰逊,n=1..1995的n,a(n)表(条款<10^16)
例子
31=西格玛(4^2)=西格马(5^2);187131=西格玛(326^2)=西格马(407^2);等。
黄体脂酮素
(PARI)m=10^5;m2=平方米;s=矢量(m);ss=矢量(m);v=矢量(49);对于(j=1,m,s[j]=σ(j^2));ss=vecsort(s);c=0;对于(j=2,m,如果(s[j]>m2,接下来);如果(s[j]>=ss[j],对于(k=j,m-1),如果(s[j]==ss[k],如果(s[j]<>ss[k+1),则下一个(2));k=m-1)),对于步骤(k=j-1,2,-1,如果(s[j]==ss[k],如果(s[j]<>ss[k-1],下一步(2));k=2));对于(k=j+1,m,如果(s[j]=s[k],如果(gcd(j,k)==1,c++;v【c】=s【j】));v=vecsort(v);n=0;对于(j=2,49,如果(v[j-1]<>v[j],n++;打印(n“”v[j]]))/*多诺万·约翰逊2013年4月20日*/
交叉参考
囊性纤维变性。A000203号.
关键字
非n
作者
大卫·W·威尔逊2001年1月4日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月24日02:53。包含373661个序列。(在oeis4上运行。)