A358554 Least Matula-Goebel number of a rooted tree with n internal (non-leaf) nodes.
1, 2, 3, 5, 11, 25, 55, 121, 275, 605, 1331, 3025, 6655, 14641, 33275, 73205
Offset: 1
Examples
The terms together with their corresponding rooted trees begin: 1: o 2: (o) 3: ((o)) 5: (((o))) 11: ((((o)))) 25: (((o))((o))) 55: (((o))(((o)))) 121: ((((o)))(((o)))) 275: (((o))((o))(((o)))) 605: (((o))(((o)))(((o)))) 1331: ((((o)))(((o)))(((o)))) 3025: (((o))((o))(((o)))(((o)))) 6655: (((o))(((o)))(((o)))(((o)))) 14641: ((((o)))(((o)))(((o)))(((o)))) 33275: (((o))((o))(((o)))(((o)))(((o)))) 73205: (((o))(((o)))(((o)))(((o)))(((o))))
Crossrefs
Programs
-
Mathematica
MGTree[n_]:=If[n==1,{},MGTree/@Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]]; seq=Table[Count[MGTree[n],[_],{0,Infinity}],{n,1000}]; Table[Position[seq,n][[1,1]],{n,Union[seq]}]
Comments