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.

Previous Showing 11-12 of 12 results.

A324839 Number of unlabeled rooted identity trees with n nodes where the branches of no branch of the root form a subset of the branches of the root.

Original entry on oeis.org

1, 0, 1, 1, 2, 3, 8, 16, 35, 74, 166, 367, 831, 1878, 4299, 9857, 22775, 52777, 122957, 287337
Offset: 1

Views

Author

Gus Wiseman, Mar 18 2019

Keywords

Comments

An unlabeled rooted tree is an identity tree if there are no repeated branches directly under the same root.
Also the number of finitary sets with n brackets where no element is also a subset. For example, the a(7) = 8 sets are (o = {}):
{{{{{{o}}}}}}
{{{{o,{o}}}}}
{{{o,{{o}}}}}
{{o,{{{o}}}}}
{{o,{o,{o}}}}
{{{o},{{o}}}}
{{o},{{{o}}}}
{{o},{o,{o}}}

Examples

			The a(1) = 1 through a(8) = 16 rooted identity trees:
  o  ((o))  (((o)))  ((o(o)))   (((o(o))))   ((o)(o(o)))    (((o))(o(o)))
                     ((((o))))  ((o((o))))   ((o(o(o))))    (((o)(o(o))))
                                (((((o)))))  ((((o(o)))))   (((o(o(o)))))
                                             (((o)((o))))   ((o)((o(o))))
                                             (((o((o)))))   ((o)(o((o))))
                                             ((o)(((o))))   ((o((o(o)))))
                                             ((o(((o)))))   ((o(o)((o))))
                                             ((((((o))))))  ((o(o((o)))))
                                                            (((((o(o))))))
                                                            ((((o)((o)))))
                                                            ((((o((o))))))
                                                            (((o)(((o)))))
                                                            (((o(((o))))))
                                                            ((o)((((o)))))
                                                            ((o((((o))))))
                                                            (((((((o)))))))
		

Crossrefs

Programs

  • Mathematica
    idall[n_]:=If[n==1,{{}},Select[Union[Sort/@Join@@(Tuples[idall/@#]&/@IntegerPartitions[n-1])],UnsameQ@@#&]];
    Table[Length[Select[idall[n],And@@Table[!SubsetQ[#,b],{b,#}]&]],{n,10}]

A324845 Matula-Goebel numbers of rooted trees where the branches of no non-leaf branch of any terminal subtree form a submultiset of the branches of the same subtree.

Original entry on oeis.org

1, 2, 3, 4, 5, 7, 8, 9, 10, 11, 14, 16, 17, 19, 20, 21, 22, 23, 25, 27, 29, 31, 32, 33, 34, 35, 38, 40, 43, 44, 46, 49, 50, 51, 53, 57, 58, 59, 62, 63, 64, 67, 68, 69, 70, 71, 73, 76, 77, 79, 80, 81, 83, 85, 86, 87, 88, 92, 93, 95, 97, 98, 99, 100, 103, 106
Offset: 1

Views

Author

Gus Wiseman, Mar 18 2019

Keywords

Examples

			The sequence of terms together with their Matula-Goebel numbers begins:
   1: o
   2: (o)
   3: ((o))
   4: (oo)
   5: (((o)))
   7: ((oo))
   8: (ooo)
   9: ((o)(o))
  10: (o((o)))
  11: ((((o))))
  14: (o(oo))
  16: (oooo)
  17: (((oo)))
  19: ((ooo))
  20: (oo((o)))
  21: ((o)(oo))
  22: (o(((o))))
  23: (((o)(o)))
  25: (((o))((o)))
  27: ((o)(o)(o))
		

Crossrefs

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    qaQ[n_]:=And[And@@Table[!Divisible[n,x],{x,DeleteCases[primeMS[n],1]}],And@@qaQ/@primeMS[n]];
    Select[Range[100],qaQ]
Previous Showing 11-12 of 12 results.