id:A069767 - OEIS Search Results

Search: id:A069767

Displaying 1-1 of 1 results found.

page 1

Permutation of natural numbers induced by the automorphism SwapDownCar! acting on the rooted planar binary trees encoded by A014486. (I.e. flip all the branches on the leftmost path of the tree).

+0
25

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

	OFFSET	`0,3`
	LINKS	`A. Karttunen, Gatomorphisms (Includes the complete Scheme program for computing this sequence)` `Index entries for sequences that are permutations of the natural numbers`
	PROGRAM	`(Scheme function implementing this automorphism on list-structures:) (define (SwapDownCar! s) (cond ((pair? s) (swap! s) (SwapDownCar! (cdr s)))) s)` `(define (swap! s) (let ((ex-car (car s))) (set-car! s (cdr s)) (set-cdr! s ex-car) s))`
	CROSSREFS	`Inverse permutation: A069768. Also its car/cdr-flipped conjugate, i.e. A069767(n) = A057163(A069768(A057163(n))). Cf. also A057161.` `Adjacent sequences: A069764 A069765 A069766 this_sequence A069768 A069769 A069770` `Sequence in context: A131000 A122351 A089863 this_sequence A127378 A122302 A131159`
	KEYWORD	`nonn`
	AUTHOR	`Antti Karttunen Apr 16 2002`

page 1

Search completed in 0.002 seconds

Last modified October 7 14:39 EDT 2008. Contains 144666 sequences.

AT&T Labs Research