%我
%S 1,2,5,4,3,10,9,8,7,6,11,20,19,18,17,16,15,14,13,25,12,23,22,21,40,38,
%电话37,36,35,34,33,32,31,30,29,28,27,53,26,50,49,24,47,46,45,44,43,42,41,
%U 81,79,39,76,75,74,72,71,70,69,68,67,66,65,64,63,62,61
%N逆置换到A309668。
%H Robert Israel,<a href=“/A309734/b309734.txt”>n,a(n)表,n=1。。10000个</a>
%H<a href=“/index/Per#IntegerPermutation”>索引自然数置换序列的条目</a>
%e A309668(5)=3,因此a(3)=5。
%价格:=[$1..100]:
%p代表n从1开始,而S<>[]则是
%p代表我从1到否
%p s:=s[i];
%p如果ilog2(n*s+n-1)>ilog2(n*s-1),则
%p A[s]:=n;
%ps:=次音阶(i=NULL,S);
%p断开
%p fi公司
%外径:
%p序列(A[i],i=1..100)_罗伯特·以色列,2020年4月23日
%参见A309668。
%不,基地,看
%O 1,2号
%2019年8月14日
|