OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A126168号 n的固有无穷因子之和。 35
0, 1, 1, 1, 1, 6, 1, 7, 1, 8, 1, 8, 1, 10, 9, 1, 1, 12, 1, 10, 11, 14, 1, 36, 1, 16, 13, 12, 1, 42, 1, 19, 15, 20, 13, 14, 1, 22, 17, 50, 1, 54, 1, 16, 15, 26, 1, 20, 1, 28, 21, 18, 1, 66, 17, 64, 23, 32, 1, 60, 1, 34, 17, 21, 19, 78, 1, 22, 27, 74, 1, 78, 1, 40, 29 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,6
评论
如果n的除数是p^{y_a2^A}形式的除数的乘积,则称其为无穷大,其中p^y是n的素数幂,sum_ay_a2 ^A是y的二进制表示。
链接
埃里克·魏斯坦的数学世界,无限除数.
公式
a(n)=isigma(n)-n=A049417号(n) -编号。
例子
由于240的无限除数是1、3、5、15、16、48、80、240,我们得到了a(240)=1+3+5+15+16+48+80=168。
MAPLE公司
A049417号:=进程(n)
局部a、pe、k、edgs、p;
a:=1;
对于ifactors(n)[2]do中的pe
p:=op(1,pe);
边缘:=转换(op(2,pe),base,2);
对于k从0到nops(边缘)-1 do
dk:=op(k+1,边缘);
a:=a*(p^(2^k*(1+dk))-1)/(p^(2^k)-1);
结束do:
结束do:
a;
结束进程:
A126168号:=进程(n)
A049417号(n) -n;
结束进程:
序列(A126168号(n) ,n=1..100)#R.J.马塔尔2021年7月23日
数学
ExponentList[n_Integer,factors_List]:={#,IntegerExponent[n,#]}&&@因子;无穷除数[1]:={1};无限除数[n_Integer?正]:=模块[{factors=First/@FactorInteger[n],d=Divisors[n]},d[[Flatten[Position[Transpose[Thread[Function[{f,g},BitOr[f,g]==g][#,Last[#]]]&/@Transpose[Last/@ExponentList[#,factors]//@d]],_?(和@@#&),{1}]]]]]空;properinfinitarydivisorsum[k_]:=加@@InfinitaryDivisors[k]-k;properinfinitarydivisorsum/@范围[75]
黄体脂酮素
(PARI)
A049417号(n) ={my(b,f=因子(n));prod(k=1,#f[,2],b=二进制(f[k,2])安德鲁·莱莱琴科2014年4月22日
A126168号(n) =(A049417号(n) -n)\\安蒂·卡图恩2017年10月4日,根据给定公式。
交叉参考
囊性纤维变性。A049417号A037445号A126164号.
关键词
容易的非n
作者
蚂蚁之王2006年12月21日
状态
经核准的

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

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

上次修改时间:2024年5月28日14:56 EDT。包含372913个序列。(在oeis4上运行。)