|
|
A126162号 |
| i<j和i<=10^n的酉友好对(i,j)的个数。 |
|
0
|
|
|
0, 0, 1, 2, 7, 19, 78, 185, 454, 1095, 2552, 6105
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,4
|
|
链接
|
|
|
公式
|
m<n的整数对(m,n)的数量,其中usigma(m)=usigma。
|
|
例子
|
a(7)=78,因为有78个m≤10^7的幺正友好对
|
|
数学
|
酉除数[n_Integer?Positive]:=选择[Divisors[n],GCD[#,n/#]==1\&];sstar[n_]:=加号@@单位除数[n]-n;UnitaryAmicableNumberQ[k_]:=如果[Nest[sstar,k,2]==k&&!sstar[k]==k,真,假];UnitaryAmicablePairList[k_]:=(anlist=Select[Range[k],UnitaryEmicableNumberQ[#]&];prlist=\Table[Sort[{anlist[[n]],sstar[anlist[]]}],{n,1,Length[anlist]}];data=Union[prlist,prlist]);单元电缆对列表[10^7];表[Length[Select[data,First[#]<\10^k&]],{k,1,7}]
|
|
交叉参考
|
|
|
关键词
|
坚硬的,非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|