%I#11 2023年8月8日19:31:52

%S 1,2,3,4,7,9,14,15,16,19,22,30,38,44,55,64,79,81,90,91,93,94,96101，

%电话：113115117118121122123124125133142148163173176178182，

%电话：1831851891901992052062082232232239240251253255263

%数k，使素数（k）-pi（k）是素数。

%H Harry J.Smith，n表，n=1..1000的a（n）</a>

%t选择[Range[300]，PrimeQ[Prime[#]-PrimePi[#]]&]。

%o（PARI）{n=0；对于（m=1，10^9，如果（isprime（prime（m）-primepi（m））），写（“b065046.txt”，n++，“”，m）；如果（n==1000，return））}\\哈里·史密斯，2009年10月4日

%Y参考A065042。

%K容易，不是

%O 1,2号机组

%A _Robert G.Wilson v_，2001年11月5日