登录
A105365号
根据(素数(n)-1)/2的奇偶校验重新排列正整数(见注释)。
1
1, 4, 2, 6, 8, 3, 5, 9, 10, 7, 12, 11, 13, 14, 15, 17, 16, 19, 18, 20, 23, 21, 22, 29, 31, 37, 24, 25, 41, 43, 26, 27, 47, 28, 53, 30, 59, 32, 33, 61, 34, 67, 35, 71, 73, 36, 38, 39, 40, 79, 83, 42, 89, 44, 97, 45, 101, 46, 103, 107
抵消
1,2
评论
a(1)=1,对于n>1:如果(素数(n)-1)/2是偶数/奇数,则a(n)是下一个素数/复合数。
数学
p=素数[范围[100]];s=补码[范围[100],p];bb={1};等于1;ip=0;Do[If[OddQ[(素数[i]-1)/2],is=is+1;bb=附加[bb,s[[is]]],ip=ip+1;bb=追加[bb,p[[ip]]],{i,2,60}];英国广播公司
交叉参考
关键词
非n
作者
扎克·塞多夫2005年4月1日
状态
经核准的