登录
A091291号
对x进行编号,使商q=(sigma[x]+sigma[2x+1])/sigma[2x+1]小于0.5,即(sigma[x]+sigma[1])/>2.sigma[2];西格玛=A000203号.
1
1283782, 3445942, 4662157, 5743237, 7770262, 8806297, 8986477, 9572062, 9920137, 10472962, 11356537, 11554042, 12635122, 12870742
抵消
1,1
数学
f[x_]:=(DivisorSigma[1,x]+DivisorSigma[1,x+1])/DivisorSigma[1,2*x+1]Do[s=f[n];如果[!大[s,0.5],打印[{n,s//n}]]
关键词
非n
作者
拉博斯·埃利默2004年2月16日
状态
经核准的