%I#3 2012年3月30日17:26:14
%S 1,2,3,5,4,6,7,9,8,11,10,12,13,15,14,17,16,19,21,18,23,25,20,22,24,27,
%电话:29,26,28,31,33,30,35,32,37,34,39,41,36,43,38,45,40,42,47,49,51,53,44,
%U 46,55,48,57,50,59,52,61,54,56,63,58,65,67,60,62,69,64,71,66,68,73,75
%N根据(素数(N)-1)/2的奇偶校验重新排列正整数(见注释)。
%C如果(素数(n+1)-1)/2是偶数/奇数,则a(n)是下一个偶数/奇数。
%tbb={};od=-1;ev=0;Do[If[EvenQ[(素数[i]-1)/2],ev=ev+2;bb=附加[bb,ev],od=od+2;bb=附加[bb,od]],{i,2,200}];英国广播公司
%Y参考A105364。
%K nonn公司
%O 1,2号机组
%2005年4月1日,A_Zak Seidov
|