%I#8 2014年8月27日14:53:42

%S 1,2,4,3,8,5,7,9,6,17,19,11,39,35,25,15,16,13,23,23,29,37,75,95,87，

%电话：61,55767,45,83,67,10,21,47,71159143139,51319175639287251，

%电话：263247135527239199447105115991119110154434575,8558321751343151,12,31,63,69131,77

%N自然数的置换：a（N）=A135141（A005940（N））。

%C偶数项以某种顺序出现在2^n+1（A000051）位置，奇数项则出现在其他位置。

%H Antti Karttunen，<a href=“/A246365/b246365.txt”>n的表，a（n）表示n=1.-10000</a>

%H<a href=“/index/Per#IntegerPermutation”>自然数排列序列的索引项</a>

%F a（n）=A135141（A005940（n））。

%o（PARI）

%o默认（质数限制，（2^31）+（2^30））；

%o A005940（n）=｛my（p=2，t=1）；n--；直到（！n\=2，if（（n%2），（t*=p），p=nextprime（p+1））；t｝；\\修改自_M.F.Hasler的代码_

%o A135141（n）=如果（1==n，1，if（i素数（n），2*A135141（素数（n）），1+（2*A135.141（n-素数（n-）-1）））；

%o A246365（n）=A135141（A005940（n））；

%o表示（n=110000，写入（“b246365.txt”，n，“”，A246365（n））；

%o（方案）（定义（A246365 n）（A135141（A005940 n））

%Y反向：A246366。

%Y相关或类似排列：A005940、A135141、A246363、A2463657。

%Y参考A000051、A003961。

%K nonn公司

%O 1,2号机组

%2014年8月26日