Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A089858
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A089858 Permutation of natural numbers induced by the Catalan automorphism gma089858 acting on the binary trees/parenthesizations encoded by A014486/A063171. +0
13
0, 1, 3, 2, 6, 8, 7, 4, 5, 14, 15, 19, 21, 22, 16, 20, 17, 9, 10, 18, 11, 12, 13, 37, 38, 39, 40, 41, 51, 52, 56, 58, 59, 60, 62, 63, 64, 42, 43, 53, 57, 61, 44, 54, 45, 23, 24, 46, 25, 26, 27, 47, 55, 48, 28, 29, 49, 30, 31, 32, 50, 33, 34, 35, 36, 107, 108, 109, 110, 111 (list; graph; listen)
OFFSET

0,3

LINKS

A. Karttunen, C-program for computing this sequence

Index entries for signature-permutations induced by Catalan automorphisms

PROGRAM

(Scheme functions implementing this automorphism on list-structures:)

(define (gma089858! s) (cond ((pair? s) (cond ((pair? (cdr s)) (robl! s) (swap! (car s))) (else (swap! s))))) s)

(define (swap! s) (let ((ex-car (car s))) (set-car! s (cdr s)) (set-cdr! s ex-car) s))

(define (robl! s) (let ((ex-car (car s))) (set-car! s (cddr s)) (set-cdr! (cdr s) ex-car) (swap! (cdr s)) (swap! s) s))

CROSSREFS

Inverse of A089861. a(n) = A072797(A069770(n)) = A069770(A089852(n)) = A057163(A073270(A057163(n))). Row 13 of A089840.

Number of cycles: A073193. Number of fixed-points: A019590. Max. cycle size: A089422. LCM of cycle sizes: A089423. (In range [A014137(n-1)..A014138(n-1)] of this permutation, possibly shifted one term left or right).

Adjacent sequences: A089855 A089856 A089857 this_sequence A089859 A089860 A089861

Sequence in context: A122321 A072093 A130925 this_sequence A071660 A130393 A130956

KEYWORD

nonn

AUTHOR

Antti Karttunen (Firstname.Surname(AT)iki.fi), Nov 29 2003

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified October 13 20:18 EDT 2008. Contains 145016 sequences.


AT&T Labs Research