登录
对n进行编号,使q^2<p,其中p=下一素数(n),q=下一质数(n的平方根)。
1

%I#15 2020年12月18日03:38:34

%S 3,7,8,23,24,47,4811314115116117118119120167168283284,

%电话285286287288359360523524525526528528839840953954955,

%电话:9569579589599601367136816691670167116721673167416751676

%N对N进行编号,使q^2<p,其中p=下一素数(N),q=下一质数(N的平方根)。

%H Harvey P.Dale,n的表格,n=1..2000的a(n)</a>

%t选择[Range[2000],NextPrime[Sqrt[#]]^2<NextPrime[#]&](*哈维·P·戴尔,2011年10月24日*)

%Y参考A151800(下一个素数)。

%K容易,不是

%O 1,1号机组

%野本浩弘(_N)_