|
%I #6 Oct 15 2015 10:55:23
%S 0,1,2,3,4,5,6,8,7,9,10,11,13,12,14,15,19,22,21,16,20,17,18,23,24,25,
%T 27,26,28,29,33,36,35,30,34,31,32,37,38,39,41,40,51,52,60,64,63,56,62,
%U 58,59,42,43,53,61,57,44,54,45,46,47,55,48,49,50,65,66,67,69,68,70,71
%N Permutation of natural numbers induced by the Catalan bijection gma073289! 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 (gmA073289! s) (cond ((pair? s) (gmA073289! (cdr s)) (gmA073287! s))) s)
%Y Inverse permutation: A073288. Occurs for first time in A073200 as row 696.
%Y The scheme function gma073287! referred to below given in A073287.
%K nonn
%O 0,3
%A _Antti Karttunen_, Jun 25 2002
|
