#该b文件由Antti Karttunen计算,2020-01-17#在GP/PARI CALCULATOR版本2.9.4(发布)和运行linux(x86-64/GMP-6.1.2内核)64位版本的amd64中,编译时间:2017年12月19日,gcc版本7.3.0(Ubuntu 7.3.0-1ubuntu1),线程引擎:pthread#使用以下程序:##默认(parisizemax,2^31);#A002110(n)=产品(i=1,n,质数(i));#A061395(n)=如果(1==n,0,素数(vecmax(因子(n)[,1]));#A034386(n)=prod(i=1,素数pi(n),素数(i));#A108951(n)={my(f=系数(n));prod(i=1,#f~,A034386(f[i,1])^f[i、2])};\\来自A108951#A331188(n)=如果(1==n,n,my(f=因子(n));prod(i=1,#f~,A002110(素数(f[i,1]))^(f[i,2]-(#f~=i)));#A331293(n)={my(h=A061395(n),u=A108951(n)-(A002110(h)*(A331188(n)%质数(1+h));(u/A002110(1+h));};#m=-1;k=0;对于(n=1,2^17,t=A331293(n));如果(t>m,m=t;k++;打印1(n,“,”);写入(“b331294.txt”,k,“”,n));1 12 83 164 255 276 497 758 819 12110 16911 28912 36113 52914 84115 96116 136917 168118 184919 220920 280921 348122 372123 448924 504125 532926 624127 688928 792129 940930 1020131 1060932 1144933 1188134 1276935 1612936 1716137 1876938 1932139 2220140 2280141 2464942 2656943 2788944 2992945 3204146 3276147 3648148 3724949 3880950 3960151 4452152 4972953 5152954 5244155 5428956 5712157 5808158 6300159 6604960 6916961 7236162 7344163 7672964 7896165 8008966 8584967 9424968 9672169 9796970 10048971 10956172 11356973 12040974 12180175 12460976 128881