%I#8 2020年11月26日19:23:36
%S 1,4,3,9,5,15,2,8,7,25,11,49,13,21,17,33,19,27,23,39,29119,31,77,37,
%电话:35,41,51,43,45,47,55,53,57,59,91,61,65,67,87,71,69,73,93,79,85,83,95,
%U 89,63,97,81101,99103,75107105109141113115127125131111137单位
%N选择a(N)作为尚未使用的最小数字,这样:a(1)=1,a(2n)=复合,a(2 N+1)=素数和部分和交替为素数或复合。
%H Robert Israel,n的表,n的a(n)=1..10000</a>
%p N:=1000:#对于第一个术语之前的术语>N
%p可用:=[$2..N]:
%pA[1]:=1:T:=1:
%分配(A[n-1])时,从2中为n取p,do
%从1到N+1-N do的j的p
%p x:=可用[j];
%p如果(n::偶数和isprime(x+T)而不是isprime
%p(n::奇数与isprime(x)and not isprim(x+T))then
%p A[n]:=x;T: =T+x;
%p可用:=亚可用(j=空,可用);
%p断点
%p菲
%p od公司
%日期:
%p序列(A[i],i=1..n-2);#_罗伯特·伊斯雷尔(Robert Israel),2020年11月26日
%Y参见A075593、A075594、A103824。
%K nonn公司
%O 1,2号机组
%A _雷·钱德勒_ 2005年2月16日
%E定义由Zak Seidov修正,2005年2月20日
|