|
%I #6 Oct 15 2015 10:55:23
%S 0,1,3,2,8,7,4,6,5,22,21,17,20,18,10,9,14,19,16,11,12,15,13,64,63,58,
%T 62,59,46,45,54,61,57,48,49,55,50,27,26,23,25,24,38,37,51,60,56,42,44,
%U 53,47,29,28,30,32,31,39,40,52,43,33,34,35,41,36,196,195,189,194,190
%N Permutation of natural numbers induced by the Catalan bijection gmA074682! acting on the parenthesizations encoded by A014486/A063171.
%H A. Karttunen, <a href="http://www.iki.fi/~kartturi/matikka/Nekomorphisms/gatomorf.htm">Gatomorphisms</a> (with the complete Scheme source)
%H <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a>
%o (Scheme function implementing this automorphism on list-structures:)
%o (define (gmA074682! s) (cond ((pair? s) (gmA074682! (car s)) (gmA074682! (cdr s)) (gmrobr! s))) s)
%Y Inverse of A074681. a(n) = A057163(A074683(A057163(n))). Occurs in A073200.
%K nonn
%O 0,3
%A _Antti Karttunen_, Sep 11 2002
|
