cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A292050 Matula-Goebel numbers of semi-binary rooted trees.

This page as a plain text file.
%I A292050 #8 Oct 01 2017 00:05:43
%S A292050 1,2,3,4,5,6,7,9,10,11,13,14,15,17,21,22,23,25,26,29,31,33,34,35,39,
%T A292050 41,43,46,47,49,51,55,58,59,62,65,69,73,77,79,82,83,85,86,87,91,93,94,
%U A292050 97,101,109,115,118,119,121,123,127,129,137,139,141,143,145
%N A292050 Matula-Goebel numbers of semi-binary rooted trees.
%C A292050 An unlabeled rooted tree is semi-binary if all out-degrees are <= 2. The number of semi-binary trees with n nodes is equal to the number of binary trees with n+1 leaves; see A001190.
%t A292050 nn=200;
%t A292050 primeMS[n_]:=If[n===1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
%t A292050 semibinQ[n_]:=Or[n===1,With[{m=primeMS[n]},And[Length[m]<=2,And@@semibinQ/@m]]];
%t A292050 Select[Range[nn],semibinQ]
%Y A292050 Cf. A000081, A001190, A007097, A036656, A061773, A111299, A214577, A291636.
%K A292050 nonn
%O A292050 1,2
%A A292050 _Gus Wiseman_, Sep 08 2017