搜索： 编号：a318048
|
| |
|
|
A318048型
|
| 具有Matula-Goebel数n的未标记根树的跨度大小。 |
|
+0
2
|
|
|
|
1, 2, 3, 2, 4, 4, 4, 2, 6, 6, 5, 4, 6, 3, 9, 2, 6, 6, 4, 6, 6, 8, 10, 4, 12, 6, 10, 4, 9, 9, 6, 2, 12, 6, 9, 6, 6, 4, 9, 6, 9, 7, 6, 8, 15, 10, 15, 4, 5, 12, 9, 7, 4, 10, 16, 4, 7, 9, 8, 9, 10, 10, 11, 2, 13, 12, 6, 7, 14, 10, 9, 6, 10, 7, 21, 3, 12, 10, 12, 6
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
树的跨度被定义为初始子树的可能终端子树集，或者是终端子树的可行初始子树集。
|
|
|
链接
|
|
|
|
例子
|
42是（o（o）（oo））的Matula-Goebel数，它的跨度为{o，（o），（oo。
|
|
|
数学
|
ext[c，{}]：=c；ext[c_，s:{__}]：=提取[c，s]；rpp[c，v，{}]：=v；rpp[c_，v_，s:{__}]：=替换部件[c，v，s]；
RLO[ear_，rue:{__}]：=联合@@（函数[x，rpp[ear，x，#2]]/@ReplaceList[ext[ear、#2]、#1]&@@@选择[Tuples[{rue，Position[ear和_]}]，MatchQ[ext[ear，#[2]]]，#[1，1]]&]）；
RL[ear_，rue:{__}]：=FixedPoint[Function[kets，Union[kees，Join@@（RLO[#，rue]&/@kees）]]，{ear}]；
素数MS[n_]：=如果[n==1，{}，扁平[Cases[FactorInteger[n]，{p_，k_}:>表[PrimePi[p]，{k}]]]；
MGTree[n_]：=如果[n==1，{}，MGTree/@primeMS[n]]；
表[Length[Union[Cases[RL[MGTree[n]，{List[__List]：>List[]}]，_List，{1，Infinity}]]，{n，100}]
|
|
|
交叉参考
|
囊性纤维变性。A000081号,A007097号,A007853号,A049076号,A061773号,A061775号,A109082号,A109129号,A206491型,A317713飞机,A318046型.
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.002秒内完成
|
