%I#12 2014年9月24日09:36:01
%S 2,1,75,10,18,1,75,41,58,2,94107,14,13,2,14,14,84527124715,13,4,
%电话:1,4276310,2,41121630743470,14,2,15,5947538839,2,8,21592,4,8,
%电话:168132293,1275530073272322035357440,6,17,17374252,9,176905
%N最小整数m>0,使得pi(m*N)除以素数(m)+素数(N),其中pi(x)表示不超过x的素数。
%C猜想:任何n>0都存在a(n)。
%孙志伟,n的表,n的a(n)=1..100</a>
%孙志伟,<a href=“http://arxiv.org/abs/1409.5685“>关于素数计算函数的一个新定理,arXiv:1409.56852014。
%e a(4)=10,因为pi(4*10)=12除以素数(4)+素数(10)=7+29=36。
%t做[m=1;标签[aa];如果[m*n>1&&Mod[Prime[m]+Prime[n],PrimePi[m*n]]==0,打印[n,“,m];后藤[bb]];m=m+1;转到[aa];标签[bb];继续,{n,1,60}]
%o(哈斯克尔)
%o a247793_list=2:f(zip[2..]$tail a000040_list),其中
%o f((x,p):xps)=m:f xps,其中
%o m=头部[y|y<-[1..],(p+a000040 y)`mod`a000720(x*y)==0]
%o——Reinhard Zumkeller,2014年9月24日
%Y参见A000040、A000720、A247600、A247601、A247602、A24760、A247640、A247672、A247 673。
%K nonn公司
%O 1,1
%A _孙志伟,2014年9月23日
|