login
A085175
Involution of natural numbers induced by the Catalan bijection gma085175 acting on symbolless S-expressions encoded by A014486/A063171.
3
0, 1, 2, 3, 4, 6, 5, 7, 8, 9, 14, 11, 16, 19, 10, 15, 12, 17, 21, 13, 20, 18, 22, 23, 37, 28, 42, 51, 25, 39, 30, 44, 56, 33, 53, 47, 60, 24, 38, 29, 43, 52, 26, 40, 31, 45, 58, 35, 54, 49, 63, 27, 41, 34, 48, 62, 32, 57, 46, 59, 36, 61, 55, 50, 64, 65, 107, 79, 121, 149
OFFSET
0,3
PROG
(Scheme function implementing this automorphism on list-structures:)
(define (gma085175! s) (gma085169! (gma057164! (gma085170! s))))
CROSSREFS
a(n) = A085169(A057164(A085170(n))). Cf. also A085161.
Sequence in context: A057512 A057508 A057164 * A130111 A104182 A371424
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jun 23 2003
STATUS
approved