OFFSET
1,2
COMMENTS
The ordering of finitary multisets is first by length and then lexicographically. This is also the ordering used for Mathematica expressions.
We define the n-th standard ordered rooted tree to be obtained by taking the (n-1)-th composition in standard order (graded reverse-lexicographic, A066099) as root and replacing each part with its own standard ordered rooted tree. This ranking is an ordered variation of Matula-Goebel numbers, giving a bijective correspondence between positive integers and unlabeled ordered rooted trees.
LINKS
EXAMPLE
The terms together with their corresponding ordered rooted trees begin:
1: o
2: (o)
3: ((o))
4: (oo)
5: (((o)))
7: (o(o))
8: (ooo)
9: ((oo))
11: ((o)(o))
13: (o((o)))
15: (oo(o))
16: (oooo)
17: ((((o))))
21: ((o)((o)))
MATHEMATICA
stc[n_]:=Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n, 2]], 1], 0]]//Reverse;
srt[n_]:=If[n==1, {}, srt/@stc[n-1]];
Select[Range[1000], FreeQ[srt[#], _[__]?(!OrderedQ[#]&)]&]
CROSSREFS
These trees are counted by A000081.
KEYWORD
nonn
AUTHOR
Gus Wiseman, Nov 14 2022
STATUS
approved