登录
对k进行编号,使k/phi(k)等于sigma(x)/x,对于某些x<=k。
4

%I#23 2023年3月9日13:52:56

%S 1,3,8,9,14,15,16,21,26,27,28,32,40,45,50,52,56,63,64,75,80,81,98100,

%电话:104112128130135144147160162182189196200208216224,

%电话:225243250255256260288310320320324336437275384392400

%N对k进行编号,使k/phi(k)等于sigma(x)/x,对于某些x<=k。

%这个序列的动机是sigma(n)/n和n/phi(n)都>=1。

%C对于前几个项,我们得到这些比率:1、3/2、2、3/2,7/3、15/8、2。。。。

%C不超过给定限制的不同值的有序列表为:

%C到10^1:[1,3/2,2];

%C到10^2:[1、3/2、7/4、15/8、2、13/6、7/3、5/2];

%C至10^3:[1、3/2、7/4、15/8、31/16、255/128、2、13/6、7/3、5/2、91/36、31/12、85/32、65/24、35/12、3、31/10、13/4];

%C至10^4:[1、3/2、7/4、15/8、31/16、255/128、2、13/6、7/3、5/2、91/36、31/12、85/32、65/24、403/144、1105/384、35/12、635/216、2555/864、3、217/72、127/42、73/24、31/10、51/16、13/4、1651/504、527/160、403/120、221/64、7/2、127/36、217/60];

%C到10^5:[1, 3/2, 7/4, 15/8, 31/16, 255/128, 65535/32768, 2, 33/16, 267/128, 13/6, 7/3, 133/54, 5/2, 91/36, 31/12, 85/32, 21845/8192, 65/24, 11/4, 89/32, 403/144, 1105/384, 35/12, 635/216, 2555/864, 3, 217/72, 127/42, 73/24, 665/216, 595/192, 31/10, 19/6, 51/16, 77/24, 1397/432, 13/4, 1651/504, 527/160, 949/288, 403/120, 221/64, 7/2, 127/36, 511/144, 6851/1920, 217/60, 119/32];

%C趋向于两组{sigma(n)/n}(A017665/A017666)和{n/phi(n)}(A109395/A076512)的交叉点。

%C如果k是一个项,那么所有大于k的数都是与k相同的素因子集,2023年3月9日,Robert Israel_

%H Robert Israel,<a href=“/A259850/b259850.txt”>n,a(n)表,n=1。.1230</a>

%e 1/φ(1)=1/1=σ(1)/1,因此1在序列中。

%e3/phi(3)=3/2=sigma(2)/2,因此3在序列中。

%e 8/φ(8)=2/1=σ(6)/6,因此8在序列中。

%p R:=NULL:计数:=0:V:={}:

%当计数<100 do时,k从1开始为p

%p V:=V并集{数论:-西格玛(k)/k};

%p如果成员(k/numtheory:-phi(k),V),则R:=R,k;计数:=计数+1 fi;

%日期:

%p R;编号_罗伯特·伊斯雷尔,2023年3月8日

%o(PARI)列表a(nn)={vs=向量(nn,n,sigma(n)/n);ve=向量(n,n,n/eulerphi(n));vr=[];对于(n=1,#ve,ven=ve[n]);对于(m=1,n,if((vs[m]==ven),print1(n,“,”);break););}

%Y参考A000010、A109395、A076512。

%Y参见A000203、A017665、A017666。

%Y图元:A361363。

%K nonn公司

%O 1,2号机组

%马库斯,2015年7月7日

%E姓名由米歇尔·马库斯更正,2020年11月25日