|
%I #6 Oct 15 2015 10:55:23
%S 0,1,2,3,4,6,5,7,8,9,14,10,16,19,11,15,12,17,20,13,18,21,22,23,37,24,
%T 42,51,25,38,26,44,47,27,53,56,60,28,39,29,43,52,30,40,31,45,54,32,46,
%U 57,61,33,41,34,48,55,35,49,58,62,36,50,59,63,64,65,107,66,121,149,67
%N Permutation of natural numbers induced by the Catalan bijection gma073285! acting on the parenthesizations encoded by A014486.
%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 (gmA073285! s) (cond ((pair? s) (gmA073285! (cdr s)) (gmA072796! s) (gmA073285! (car s)))) s)
%Y Inverse permutation: A073284.
%Y The scheme function gma072796! referred to below given in A072796.
%K nonn
%O 0,3
%A _Antti Karttunen_, Jun 25 2002
|
