登录
搜索: 编号:a298534
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
有根树的Matula-Goebel数,这样根的每个分支都有相同数量的叶子。
+0
4
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 15, 16, 17, 18, 19, 20, 22, 23, 24, 25, 27, 29, 30, 31, 32, 33, 36, 37, 40, 41, 43, 44, 45, 47, 48, 49, 50, 53, 54, 55, 59, 60, 61, 62, 64, 66, 67, 71, 72, 73, 75, 79, 80, 81, 83, 88, 89, 90, 91, 93, 96, 97, 99, 100
抵消
1,2
例子
树木序列开始:
1个
2(o)
3((o))
4(oo)
5((o))
6(o(o))
7((oo))
8(ooo)
9(o)(o))
10(o(o))
11(((o)))
12(oo(o))
13(o(o))
15(o)(o))
16(oooo)
17(((oo))
18(o(o)(o))
19(零)
20(oo((o)))
22(o((o)))
23((o)(o))
24(ooo(o))
25((o)(o))
27(o)(o)
29((o(o)))
30(o(o)(o))
数学
nn=2000;
素数MS[n_]:=如果[n===1,{},平坦[Cases[FactorInteger[n],{p_,k_}:>表[PrimePi[p],{k}]]];
叶数[n_]:=如果[n===1,1,其中[{m=primeMS[n]},如果[Length[m]===1,叶数[First[m]],总计[leafcount/@m]]];
选择[Range[nn],SameQ@@leafcount/@primeMS[#]&]
关键词
非n
作者
古斯·怀斯曼2018年1月20日
状态
经核准的

搜索在0.004秒内完成