login
A057512
Permutation of natural numbers: rotations of all branches of the rooted plane trees encoded by A014486. (to opposite direction of A057511).
26
0, 1, 2, 3, 4, 6, 5, 7, 8, 9, 14, 10, 16, 19, 11, 15, 12, 17, 20, 13, 18, 21, 22, 23, 37, 24, 42, 51, 25, 38, 26, 44, 53, 27, 47, 56, 60, 28, 39, 29, 43, 52, 30, 40, 31, 45, 54, 34, 46, 57, 61, 33, 41, 32, 48, 55, 35, 49, 58, 62, 36, 50, 59, 63, 64, 65, 107, 66, 121, 149, 67
OFFSET
0,3
MAPLE
# See A057510 for rotateR, A057501 for other procedures.
map(CatalanRankGlobal, map(DeepRotateR, A014486));
DeepRotateR := n -> pars2binexp(deeprotateR(binexp2pars(n)));
deeprotateR := proc(a) if 0 = nops(a) or list <> whattype(a) then (a) else rotateR(map(deeprotateR, a)); fi; end;
CROSSREFS
Inverse permutation: A057511. Cycle counts: A057513.
Sequence in context: A127285 A130945 A073285 * A057508 A057164 A085175
KEYWORD
nonn
AUTHOR
Antti Karttunen, Sep 03 2000
STATUS
approved