%I#21 2015年10月23日03:56:24
%S 2,228968112802109319045386170810010339129011579519032,
%电话:22620265703088833558340662461335200358277649627206579590,
%电话:8754495932104759114030123750133924144557155652167215179250191760
%N最小整数k>1,使得sqrt(k)/log(k)超过N。
%H Danny Rorabaugh,n的表,n的a(n)=1..10000</a>
%p A262058:=程序(n)
%p位数:=30;
%从2do到k的p
%p如果evalf(sqrt(k)>n*log(k)),则
%p返回k;
%p end if;
%p端do:
%p end程序:#_R.J.Mathar_,2015年10月22日
%tf[n_]:=f[n]=块[{k=f[n-1]},而[n>Sqrt[k]/Log[k],k++];k] ;f[1]=2;数组[f,50]
%o(PARI)a(n)={my(k=2);while(sqrt(k)/log(k)<=n,k++);k;}\\_Michel Marcus_,2015年9月10日
%o(鼠尾草)
%o定义A262058(n,d=50):
%o(低,高)=(1,2)
%o当N(sqrt(高),数字=d)<=N(N*log(高)),数字=d)时:
%o高*=2
%o低+1<高:
%o中部=天花板((低+高)/2)
%o如果N(sqrt(mid),数字=d)<=N(N*log(mid
%o低=中
%o其他:
%o高=中
%o回报高#_Danny Rorabaugh,2015年9月26日
%Y参考A088346、A262059、A262060。
%K nonn公司
%O 1,1号机组
%A _罗伯特·G·威尔逊,2015年9月9日