# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a130371
Showing 1-1 of 1

%I A130371 #5 Mar 31 2012 13:21:14
%S A130371 0,1,2,3,4,5,6,8,7,9,10,11,12,13,14,15,16,20,21,19,22,18,17,23,24,25,
%T A130371 27,26,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,55,54,47,57,
%U A130371 58,59,51,52,53,61,62,56,63,48,49,60,64,50,46,45,65,66,67,68,69,70,71
%N A130371 Signature permutation of a Catalan automorphism: apply *A074685 to the last subtree, if the root degree (A057515(n)) is odd.
%H A130371 A. Karttunen, <a href="/A130371/b130371.txt">Table of n, a(n) for n = 0..2055</a>
%H A130371 <a href="/index/Per#IntegerPermutationCatAuto">Index entries for signature-permutations of Catalan automorphisms</a>
%o A130371 (Destructive Scheme implementation of this automorphism, which acts on S-expressions, i.e. list-structures:)
%o A130371 (define (*A130371! s) (if (odd? (length s)) (*A074685! (car (last-pair s)))) s)
%Y A130371 Inverse: A130372. a(n) = A130370(A074685(n)) = A074686(A130375(A074685(n))) = A130370(A130375(A130369(n))).
%K A130371 nonn
%O A130371 0,3
%A A130371 _Antti Karttunen_, Jun 05 2007

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE