login
A057511
Permutation of natural numbers: rotations of all branches of the rooted plane trees encoded by A014486.
28
0, 1, 2, 3, 4, 6, 5, 7, 8, 9, 11, 14, 16, 19, 10, 15, 12, 17, 20, 13, 18, 21, 22, 23, 25, 28, 30, 33, 37, 39, 42, 44, 53, 51, 47, 56, 60, 24, 29, 38, 43, 52, 26, 40, 31, 45, 48, 34, 54, 57, 61, 27, 41, 32, 46, 55, 35, 49, 58, 62, 36, 50, 59, 63, 64, 65, 67, 70, 72, 75, 79, 81
OFFSET
0,3
MAPLE
# See A057509 for rotateL, A057501 for other procedures.
map(CatalanRankGlobal, map(DeepRotateL, A014486));
DeepRotateL := n -> pars2binexp(deeprotateL(binexp2pars(n)));
deeprotateL := proc(a) if 0 = nops(a) or list <> whattype(a) then (a) else rotateL(map(deeprotateL, a)); fi; end;
CROSSREFS
Inverse permutation: A057512. Cycle counts: A057513. Number of fixed objects: A057546. Max. cycle lengths are given by Landau's function A000793.
Sequence in context: A127286 A130946 A073284 * A121730 A275659 A244321
KEYWORD
nonn
AUTHOR
Antti Karttunen, Sep 03 2000
STATUS
approved