A358375 Numbers k such that the k-th standard ordered rooted tree is binary.
1, 4, 18, 25, 137, 262146, 393217, 2097161, 2228225
Offset: 1
Examples
The initial terms and their corresponding trees: 1: o 4: (oo) 18: ((oo)o) 25: (o(oo)) 137: ((oo)(oo)) 262146: (((oo)o)o) 393217: (o((oo)o))
Links
Crossrefs
These trees are counted by A126120.
Programs
-
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[#],[_]?(Length[#]!=2&)]&]
Comments