登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A318048型 具有Matula-Goebel数n的未标记根树的跨度大小。 2

%我

%S 1,2,3,2,4,4,4,12,6,6,5,4,6,3,9,2,6,4,6,6,8,10,4,12,6,10,9,6,2,

%T 12,6,9,6,6,4,9,6,9,7,6,8,15,10,15,4,5,12,9,4,10,16,4,17,9,8,9,10,10,

%U 11,2,13,12,6,7,14,10,9,6,10,7,21,3,12,10,12,6

%N具有Matula-Goebel数N的未标记根树的跨度大小。

%C树的跨度被定义为初始子树的可能终端子树集,或相同的,终端子树的潜在初始子树集。

%H<a href=“/index/Mat#matula”>与matula-Goebel数相关的序列的索引条目</a>

%e 42是(o(o)(oo))的Matula-Goebel数,它有span{o,(o),(oo。

%文本[c,{}]:=c;ext[c_,s:{__}]:=提取[c,s];rpp[c,v,{}]:=v;rpp[c_,v_,s:{__}]:=替换部件[c,v,s];

%t RLO[ear_,rue:{__}]:=联合@@;

%t RL[ear_,rue:{__}]:=FixedPoint[Function[kets,Union[kees,Join@@(RLO[#,rue]&/@kets)]],{ear}];

%t素数MS[n_]:=如果[n==1,{},扁平[Cases[FactorInteger[n],{p_,k_}:>表[PrimePi[p],{k}]]];

%t MGTree[n_]:=如果[n==1,{},MGTree/@primeMS[n]];

%t表[Length[Union[Cases[RL[MGTree[n],{List[__List]:>List[]}],_List,{1,Infinity}]],{n,100}]

%Y参见A000081、A007097、A007853、A049076、A061773、A0611775、A109082、A109129、A206491、A317713、A318046。

%K nonn公司

%O 1,2号机组

%A _Gus Wiseman_,2018年8月13日

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:2023年2月3日16:03 EST。包含360035个序列。(在oeis4上运行。)