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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A064348号 数k,使得k和k+1具有相同的酉除数和相同的除数。 1
14, 44, 1334, 1634, 2295, 2685, 3195, 17255, 33998, 42818, 45716, 79316, 84134, 122073, 124676, 125811, 166934, 239499, 289454, 294151, 383594, 440013, 544334, 605985, 649154, 655005, 736515, 1163624, 1325511, 1364104 (列表图表参考历史文本内部格式)
抵消
1,1
链接
阿米拉姆·埃尔达尔,n=1..1204时的n,a(n)表(Harry J.Smith第1..75条)
数学
g[1]={1,1};g[n_]:={Times@@((f=FactorInteger[n])[[;;,2]+1),Times@@(1+Power@@@f)};s={};g1={0,0};做[g2=g[n];如果[g1==g2,则附加到[s,n-1]];g1=g2,{n,1,50000}];秒(*阿米拉姆·埃尔达尔2019年6月19日*)
黄体脂酮素
(PARI){usigma(n,s=1,fac,i)=fac=因子(n);对于(i=1,matsize(fac)[1],s=s*(1+fac[i,1]^fac[i,2]);返回(s);}对于(n=1,10^6,if(usigma,n)==usigma
(PARI)usigma(n)={local(f,s=1);f=factor(n);对于(i=1,matsize(f)[1],s*=1+f[i,1]^f[i,2]);返回}{n=0;s=0;d=0;对于(m=1,10^9,us=usigma,m+1);ud=numdiv(m+1),如果(s=us&d==ud,写入(“b064348.txt”,n++,“”,m);如果(n==100,中断);s=us;d=ud)}\\哈里·史密斯2009年9月12日
交叉参考
囊性纤维变性。A000005号,A034448号,A064125号.
关键词
非n
作者
杰森·厄尔斯2001年10月15日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年4月19日15:34。包含371794个序列。(在oeis4上运行。)