登录

年度呼吁:请向OEIS基金会捐款支持OEIS的持续开发和维护。现在是我们的第61年,我们有超过378000个序列,我们已经获得了11000条引文(通常说“多亏了OEIS才发现”)。

A175393号
a(n)=2n除数的对数(j,k),j<=k,使得j+k除以2n。
2
1, 2, 3, 3, 2, 7, 2, 4, 5, 5, 2, 11, 2, 4, 8, 5, 2, 12, 2, 8, 7, 4, 2, 15, 3, 4, 7, 7, 2, 20, 2, 6, 6, 4, 5, 20, 2, 4, 6, 11, 2, 17, 2, 6, 15, 4, 2, 19, 3, 8, 6, 6, 2, 17, 5, 10, 6, 4, 2, 33, 2, 4, 13, 7, 4, 15, 2, 6, 6, 12, 2, 28, 2, 4, 13, 6, 4, 15, 2, 14, 9, 4, 2, 29, 4, 4, 6, 8, 2, 38, 5, 6, 6, 4, 4
抵消
1,2
评论
奇数n的任意两个除数之和决不会除n。
发件人罗伯特·伊斯雷尔2017年10月9日:(开始)
(1,1)和(n,n)总是这样的对,因此a(n)>=2表示n>=2。
a(n)=2当且仅当n是除3以外的素数。
a(3^k)=2*k+1。
对于除3以外的素数,a(p^k)=k+1。(结束)
链接
罗伯特·伊斯雷尔,n=1..10000时的n,a(n)表
例子
2*6=12的除数是1,2,3,4,6,12。每对除数之和等于12的除数是1+1=2、1+2=3、1+3=4、2+2=4、2+4=6、3+3=6和6+6=12。其中有七对,因此a(6)=7。
MAPLE公司
f: =proc(n)局部D,k,t;
D: =数字理论:-除数(2*n);
t: =0;
对于k从1到nops(D)do
t: =t+nops(选择(j->2*n mod(D[j]+D[k])=0,[$1..k]))
od;
t吨
结束进程:
地图(f,[1..100]美元)#罗伯特·伊斯雷尔2017年10月9日
数学
表[Length[Select[Total/@Union[Sort/@Tuples[Divisors[2n],2],Mod[2n,#]==0&]],{n,100}](*哈维·P·戴尔,2023年4月9日*)
关键词
非n
作者
勒罗伊·奎特,2010年4月29日
扩展
更多术语来自D.S.麦克尼尔2010年5月9日
状态
经核准的