%I#6 2012年6月28日15:28:14
%S 59473596715969959707597295974359747597555977715977959791,
%电话:597995981015299315300155801155809155821155833155849155853,
%电话:15587715588915591315592521053321189121193321194321949211969
%N最小N,使得pi(N)=地板[N/log((N-pi(N))/e)]。
%H Eric Weisstein的数学世界,<a href=“http://mathworld.wolfram.com/PrimeNumberTheorem.html“>素数定理</a>
%t j=0;Do[k=地板[n/Log[(n-PrimePi[n])/E]];如果[PrimePi[n]==k&&k>j,则打印[n];j=k],{n,1,10^7,1}]
%Y参考A057834、A058289、A000720。
%K nonn公司
%O 1,1号机组
%A _Manuel Valdivia,2007年12月7日