cp's OEIS Frontend

A330943 Matula-Goebel numbers of singleton-reduced rooted trees.

%I A330943 #13 Jan 15 2020 00:25:24
%S A330943 1,2,4,6,7,8,12,13,14,16,18,19,21,24,26,28,32,34,36,37,38,39,42,43,48,
%T A330943 49,52,53,54,56,57,61,63,64,68,72,73,74,76,78,82,84,86,89,91,96,98,
%U A330943 101,102,104,106,107,108,111,112,114,117,119,122,126,128,129,131
%N A330943 Matula-Goebel numbers of singleton-reduced rooted trees.
%C A330943 These trees are counted by A330951.
%C A330943 A rooted tree is singleton-reduced if no non-leaf node has all singleton branches, where a rooted tree is a singleton if its root has degree 1.
%C A330943 The Matula-Goebel number of a rooted tree is the product of primes of the Matula-Goebel numbers of its branches. This gives a bijective correspondence between positive integers and unlabeled rooted trees.
%C A330943 A prime index of n is a number m such that prime(m) divides n. A number belongs to this sequence iff it is 1 or its prime indices all belong to this sequence but are not all prime.
%e A330943 The sequence of all singleton-reduced rooted trees together with their Matula-Goebel numbers begins:
%e A330943    1: o
%e A330943    2: (o)
%e A330943    4: (oo)
%e A330943    6: (o(o))
%e A330943    7: ((oo))
%e A330943    8: (ooo)
%e A330943   12: (oo(o))
%e A330943   13: ((o(o)))
%e A330943   14: (o(oo))
%e A330943   16: (oooo)
%e A330943   18: (o(o)(o))
%e A330943   19: ((ooo))
%e A330943   21: ((o)(oo))
%e A330943   24: (ooo(o))
%e A330943   26: (o(o(o)))
%e A330943   28: (oo(oo))
%e A330943   32: (ooooo)
%e A330943   34: (o((oo)))
%e A330943   36: (oo(o)(o))
%e A330943   37: ((oo(o)))
%t A330943 primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
%t A330943 mgsingQ[n_]:=n==1||And@@mgsingQ/@primeMS[n]&&!And@@PrimeQ/@primeMS[n];
%t A330943 Select[Range[100],mgsingQ]
%Y A330943 The series-reduced case is A291636.
%Y A330943 Unlabeled rooted trees are counted by A000081.
%Y A330943 Numbers whose prime indices are not all prime are A330945.
%Y A330943 Singleton-reduced rooted trees are counted by A330951.
%Y A330943 Singleton-reduced phylogenetic trees are A000311.
%Y A330943 The set S of numbers whose prime indices do not all belong to S is A324694.
%Y A330943 Cf. A000669, A001678, A006450, A007097, A007821, A061775, A196050, A257994, A276625, A277098, A320628, A330944, A330948.
%K A330943 nonn
%O A330943 1,2
%A A330943 _Gus Wiseman_, Jan 13 2020