%I#16 2025年6月5日18:29:59
%第2,7,17,29,7923915721129334744954160770985310091103页,
%电话127714231543174119132137243726332728929939316333913943,
%电话:4201452347295227543758136197652169477349760382198501886791579923
%N最小素数x>N,使得x(mod N)=x(mod-素数(N))。
%C a(n)总是存在的,例如根据Dirchlet关于算术级数中素数的定理,有无穷多个素数==1(mod n*prime(n))。-以色列罗巴特,2025年6月5日
%H Robert Israel,n的表,a(n)表示n=1..10000</a>
%e a(2)=7,因为素数(2)=3和x=7是最小素数>2,所以x(mod 2)=x(mod3)。
%p f:=进程(n)局部b,u,k,x;
%p b:=i素数(n);
%从1do到u的p
%k从1到n-1的p do
%px:=k+u*n*b;
%p如果isprime(x),则返回xfi
%今天下午
%p端程序:
%p f(1):=2:
%p映射(f,[1..100]美元);#_Robert Israel_,2025年6月5日
%o(PARI)a(n)={p=下一素数(n+1);while(p%n)!=(p%prime(n)),p=下一素数(p+1));p;}\\_Michel Marcus_,2013年10月5日
%Y参考A000040。
%K nonn公司
%O 1,1号机组
%2004年2月21日,A_Zak Seidov