A085171 Permutation of natural numbers induced by the Catalan bijection gma085171 acting on symbolless S-expressions encoded by A014486/A063171.

0, 1, 2, 3, 4, 6, 7, 5, 8, 9, 11, 14, 16, 19, 17, 20, 12, 10, 15, 21, 18, 13, 22, 23, 25, 28, 30, 33, 37, 39, 42, 44, 53, 51, 56, 47, 60, 45, 48, 54, 57, 61, 31, 34, 26, 24, 29, 40, 38, 43, 52, 58, 62, 49, 46, 55, 35, 32, 27, 41, 63, 59, 50, 36, 64, 65, 67, 70, 72, 75

Offset

0,3

Links

Table of n, a(n) for n=0..69.

A. Karttunen, Gatomorphisms (With the complete Scheme source)

Index entries for signature-permutations induced by Catalan automorphisms

Prog

(Scheme function implementing this automorphism on list-structures:)
(define (gma085171! s) (cond ((null? s) s) (else (app-to-xrt! (gma085171! (car s)) (append! (map gma085171! (cdr s)) (list (list)))))))

Crossrefs

Inverse: A085172. Cf. also A085163, A085164, A085203.

Sequence in context: A086430 A073194 A085159 * A085163 A084469 A085166

Adjacent sequences: A085168 A085169 A085170 * A085172 A085173 A085174

Keyword

nonn

Author

Antti Karttunen, Jun 23 2003

Status

approved