%I#14 2022年1月7日07:23:37
%S 0,1,2,3,4,6,5,7,8,9,10,14,16,19,11,15,12,17,18,13,20,21,22,23,25,24,
%电话:26,27,37,38,42,44,47,51,53,56,60,28,29,39,43,52,30,40,31,45,46,32,48,
%U 49,50,33,41,34,54,55,35,57,58,59,36,61,62,63,64,65,66,70,72,75,67,71
%加泰罗尼亚自同构的N签名置换:翻转列表顶层偶数和奇数索引元素的位置,如果长度(A057515(N))为奇数,则保留最后一个元素。
%C这种自逆自同构将偶数长度列表(1 2 3 4…2n-1 2n)的顶层置换为(2 1 4 3…2n 2n-1),当应用于奇数长度列表时(1 2 4 4…2n 1 2n 2n+1),将其置换为(1 1 4 3..2n 2n-1 2n+1)。
%H Antti Karttunen,n的表,n=0..2055的a(n)</a>
%H<a href=“/index/Per#IntegerPermutationCatAuto”>加泰罗尼亚自同构的签名置换索引条目</a>
%o(此自同构的破坏性方案实现,作用于S表达式,即列表结构:)
%o(定义(*A130374!s)(条件((对)(*A072796!s))(如果(对?(cdr s)))
%Y参考a(n)=A057508(A130373(A05750八(n)))=A057164(A130733(A057 164(n)。此外,a(A085223(n))=A130370(A122282(A130369(A085233(n。A073193和A073192给出了该置换范围[A014137(n-1)..A014138(n-1。
%K nonn,看
%0、3
%2007年6月5日,安蒂·卡图宁
|