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.

Showing 1-10 of 14 results. Next

A324764 Number of anti-transitive rooted identity trees with n nodes.

Original entry on oeis.org

1, 1, 1, 1, 3, 4, 9, 20, 41, 89, 196, 443, 987, 2246, 5114, 11757, 27122, 62898, 146392, 342204, 802429, 1887882
Offset: 1

Views

Author

Gus Wiseman, Mar 17 2019

Keywords

Comments

A rooted identity tree is an unlabeled rooted tree with no repeated branches directly under the same root. It is anti-transitive if the branches of the branches of the root are disjoint from the branches of the root.
Also the number of finitary sets S with n brackets where no element of an element of S is also an element of S. For example, the a(8) = 20 finitary sets are (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}}}

Examples

			The a(1) = 1 through a(7) = 9 anti-transitive 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))))))

Links

Crossrefs

Cf. A000081, A004111, A276625, A279861, A290689, A304360, A306844 (non-identity version), A316500, A317787, A318185.
Cf. A324694, A324751, A324756, A324758, A324765, A324767, A324768, A324770, A324839, A324840, A324844.

Programs

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

Extensions

a(21)-a(22) from Jinyuan Wang, Jun 20 2020

A324765 Number of recursively anti-transitive rooted trees with n nodes.

Original entry on oeis.org

1, 1, 2, 3, 6, 11, 26, 52, 119, 266, 618, 1432, 3402, 8093, 19505, 47228, 115244, 282529, 696388, 1723400
Offset: 1

Views

Author

Gus Wiseman, Mar 17 2019

Keywords

Comments

An unlabeled rooted tree is recursively anti-transitive if no branch of a branch of a terminal subtree is a branch of the same subtree.

Examples

			The a(1) = 1 through a(6) = 11 recursively anti-transitive rooted trees:
  o  (o)  (oo)   (ooo)    (oooo)     (ooooo)
          ((o))  ((oo))   ((ooo))    ((oooo))
                 (((o)))  (((oo)))   (((ooo)))
                          ((o)(o))   ((o)(oo))
                          (o((o)))   (o((oo)))
                          ((((o))))  (oo((o)))
                                     ((((oo))))
                                     (((o)(o)))
                                     ((o((o))))
                                     (o(((o))))
                                     (((((o)))))

Crossrefs

Cf. A000081, A290689, A301700, A304360, A306844, A317787, A318185.
Cf. A324695, A324751, A324756, A324758, A324764, A324766, A324767, A324768.
Cf. A324838, A324840, A324844.

Programs

  • Mathematica
    nallt[n_]:=Select[Union[Sort/@Join@@(Tuples[nallt/@#]&/@IntegerPartitions[n-1])],Intersection[Union@@#,#]=={}&];
Table[Length[nallt[n]],{n,10}]

A324844 Number of unlabeled rooted trees with n nodes 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, 1, 2, 3, 7, 13, 32, 71, 170, 406, 1002, 2469, 6204, 15644, 39871, 102116, 263325, 682079, 1775600, 4640220
Offset: 1

Views

Author

Gus Wiseman, Mar 18 2019

Keywords

Examples

			The a(1) = 1 through a(6) = 13 rooted trees:
  o  (o)  (oo)   (ooo)    (oooo)     (ooooo)
          ((o))  ((oo))   ((ooo))    ((oooo))
                 (((o)))  (o(oo))    (o(ooo))
                          (((oo)))   (((ooo)))
                          ((o)(o))   ((o)(oo))
                          (o((o)))   ((o(oo)))
                          ((((o))))  (o((oo)))
                                     (oo((o)))
                                     ((((oo))))
                                     (((o)(o)))
                                     ((o((o))))
                                     (o(((o))))
                                     (((((o)))))

Crossrefs

The Matula-Goebel numbers of these trees are given by A324845.
Cf. A000081, A290689, A306844, A318185.
Cf. A324694, A324738, A324744, A324749, A324754, A324759, A324765, A324768, A324838, A324843, A324846, A324847, A324848, A324849.

Programs

  • Mathematica
    submultQ[cap_,fat_]:=And@@Function[i,Count[fat,i]>=Count[cap,i]]/@Union[List@@cap];
rallt[n_]:=Select[Union[Sort/@Join@@(Tuples[rallt/@#]&/@IntegerPartitions[n-1])],And@@Table[!submultQ[b,#],{b,DeleteCases[#,{}]}]&];
Table[Length[rallt[n]],{n,10}]

A324840 Number of fully recursively anti-transitive rooted trees with n nodes.

Original entry on oeis.org

1, 1, 2, 3, 5, 7, 14, 23, 46, 85, 165, 313, 625, 1225, 2459, 4919, 9928, 20078, 40926, 83592
Offset: 1

Views

Author

Gus Wiseman, Mar 17 2019

Keywords

Comments

An unlabeled rooted tree is fully recursively anti-transitive if no proper terminal subtree of any terminal subtree is a branch of the larger subtree.

Examples

			The a(1) = 1 through a(7) = 14 fully recursively anti-transitive rooted trees:
  o  (o)  (oo)   (ooo)    (oooo)     (ooooo)      (oooooo)
          ((o))  ((oo))   ((ooo))    ((oooo))     ((ooooo))
                 (((o)))  (((oo)))   (((ooo)))    (((oooo)))
                          ((o)(o))   ((o)(oo))    ((o)(ooo))
                          ((((o))))  ((((oo))))   ((oo)(oo))
                                     (((o)(o)))   ((((ooo))))
                                     (((((o)))))  (((o))(oo))
                                                  (((o)(oo)))
                                                  ((o)((oo)))
                                                  ((o)(o)(o))
                                                  (((((oo)))))
                                                  ((((o)(o))))
                                                  (((o))((o)))
                                                  ((((((o))))))

Links

Crossrefs

Cf. A000081, A279861, A290689, A304360, A306844, A318185.
Cf. A324695, A324751, A324756, A324758, A324763, A324765, A324768, A324769, A324770.
Cf. A324838, A324841, A324844, A324846.

Programs

  • Mathematica
    dallt[n_]:=Select[Union[Sort/@Join@@(Tuples[dallt/@#]&/@IntegerPartitions[n-1])],Intersection[Union@@Rest[FixedPointList[Union@@#&,#]],#]=={}&];
Table[Length[dallt[n]],{n,10}]

A324838 Number of unlabeled rooted trees with n nodes where the branches of no branch of the root form a submultiset of the branches of the root.

Original entry on oeis.org

1, 0, 1, 2, 5, 10, 28, 64, 169, 422, 1108, 2872, 7627, 20202, 54216, 145867, 395288
Offset: 1

Views

Author

Gus Wiseman, Mar 18 2019

Keywords

Examples

			The a(1) = 1 through a(6) = 10 rooted trees:
  o  ((o))  ((oo))   ((ooo))    ((oooo))
            (((o)))  (((oo)))   (((ooo)))
                     ((o)(o))   ((o)(oo))
                     ((o(o)))   ((o(oo)))
                     ((((o))))  ((oo(o)))
                                ((((oo))))
                                (((o)(o)))
                                (((o(o))))
                                ((o((o))))
                                (((((o)))))

Crossrefs

Cf. A000081, A290689, A304360, A306844, A317787, A318185.
Cf. A324694, A324696, A324704, A324738, A324744, A324758, A324759, A324765, A324768, A324771, A324839, A324840, A324844, A324846.

Programs

  • Mathematica
    submultQ[cap_,fat_]:=And@@Function[i,Count[fat,i]>=Count[cap,i]]/@Union[List@@cap];
rtall[n_]:=Union[Sort/@Join@@(Tuples[rtall/@#]&/@IntegerPartitions[n-1])];
Table[Length[Select[rtall[n],And@@Table[!submultQ[b,#],{b,#}]&]],{n,10}]

A358453 Number of transitive ordered rooted trees with n nodes.

Original entry on oeis.org

1, 1, 1, 2, 4, 8, 17, 37, 83, 190, 444, 1051, 2518, 6090, 14852
Offset: 1

Views

Author

Gus Wiseman, Nov 18 2022

Keywords

Comments

We define an unlabeled ordered rooted tree to be transitive if every branch of a branch of the root already appears farther to the left as a branch of the root. An undirected version is A358454.

Examples

			The a(1) = 1 through a(7) = 17 trees:
  o  (o)  (oo)  (ooo)   (oooo)   (ooooo)    (oooooo)
                (o(o))  (o(o)o)  (o(o)oo)   (o(o)ooo)
                        (o(oo))  (o(oo)o)   (o(oo)oo)
                        (oo(o))  (o(ooo))   (o(ooo)o)
                                 (oo(o)o)   (o(oooo))
                                 (oo(oo))   (oo(o)oo)
                                 (ooo(o))   (oo(oo)o)
                                 (o(o)(o))  (oo(ooo))
                                            (ooo(o)o)
                                            (ooo(oo))
                                            (oooo(o))
                                            (o(o)(o)o)
                                            (o(o)(oo))
                                            (o(o)o(o))
                                            (o(oo)(o))
                                            (oo(o)(o))
                                            (o(o)((o)))

Crossrefs

The unordered version is A290689, ranked by A290822.
The undirected version is A358454, ranked by A358458.
These trees are ranked by A358457.
A000081 counts rooted trees.
A306844 counts anti-transitive rooted trees.
Cf. A318185, A324695, A324751, A324756, A324758, A324764-A324768, A324838, A324840, A324844, A358456.

Programs

  • Mathematica
    aot[n_]:=If[n==1,{{}},Join@@Table[Tuples[aot/@c],{c,Join@@Permutations/@IntegerPartitions[n-1]}]];
Table[Length[Select[aot[n],Function[t,And@@Table[Complement[t[[k]],Take[t,k]]=={},{k,Length[t]}]]]],{n,10}]

A324769 Matula-Goebel numbers of fully anti-transitive rooted trees.

Original entry on oeis.org

1, 2, 3, 4, 5, 7, 8, 9, 11, 13, 16, 17, 19, 21, 23, 25, 27, 29, 31, 32, 35, 37, 41, 43, 47, 49, 51, 53, 57, 59, 61, 63, 64, 65, 67, 71, 73, 77, 79, 81, 83, 85, 89, 91, 95, 97, 101, 103, 107, 109, 113, 115, 121, 125, 127, 128, 129, 131, 133, 137, 139, 143, 147
Offset: 1

Views

Author

Gus Wiseman, Mar 17 2019

Keywords

Comments

An unlabeled rooted tree is fully anti-transitive if no proper terminal subtree of any branch of the root is a branch of the root.

Examples

			The sequence of fully anti-transitive rooted trees together with their Matula-Goebel numbers begins:
   1: o
   2: (o)
   3: ((o))
   4: (oo)
   5: (((o)))
   7: ((oo))
   8: (ooo)
   9: ((o)(o))
  11: ((((o))))
  13: ((o(o)))
  16: (oooo)
  17: (((oo)))
  19: ((ooo))
  21: ((o)(oo))
  23: (((o)(o)))
  25: (((o))((o)))
  27: ((o)(o)(o))
  29: ((o((o))))
  31: (((((o)))))
  32: (ooooo)
  35: (((o))(oo))
  37: ((oo(o)))
  41: (((o(o))))
  43: ((o(oo)))
  47: (((o)((o))))
  49: ((oo)(oo))

Crossrefs

Cf. A000081, A007097, A276625, A290760, A304360, A306844.
Cf. A324695, A324751, A324756, A324758, A324766, A324768, A324770.
Cf. A324838, A324841, A324845, A324846.

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
fullantiQ[n_]:=Intersection[Union@@Rest[FixedPointList[Union@@primeMS/@#&,primeMS[n]]],primeMS[n]]=={};
Select[Range[100],fullantiQ]

A358456 Number of recursively bi-anti-transitive ordered rooted trees with n nodes.

Original entry on oeis.org

1, 1, 2, 3, 7, 17, 47, 117, 321, 895, 2556, 7331, 21435, 63116, 187530
Offset: 1

Views

Author

Gus Wiseman, Nov 18 2022

Keywords

Comments

We define an unlabeled ordered rooted tree to be recursively bi-anti-transitive if there are no two branches of the same node such that one is a branch of the other.

Examples

			The a(1) = 1 through a(6) = 17 trees:
  o  (o)  (oo)   (ooo)    (oooo)     (ooooo)
          ((o))  ((oo))   ((ooo))    ((oooo))
                 (((o)))  (((o))o)   (((o))oo)
                          (((oo)))   (((oo))o)
                          ((o)(o))   (((ooo)))
                          (o((o)))   ((o)(oo))
                          ((((o))))  ((oo)(o))
                                     (o((o))o)
                                     (o((oo)))
                                     (oo((o)))
                                     ((((o)))o)
                                     ((((o))o))
                                     ((((oo))))
                                     (((o)(o)))
                                     ((o((o))))
                                     (o(((o))))
                                     (((((o)))))

Crossrefs

The unordered version is A324765, ranked by A324766.
The directed version is A358455.
A000108 counts ordered rooted trees, unordered A000081.
A306844 counts anti-transitive rooted trees.
A358453 counts transitive ordered trees, unordered A290689.
Cf. A318185, A324695, A324751, A324756, A324758, A324764, A324767, A324768, A324838, A324840, A324844.

Programs

  • Mathematica
    aot[n_]:=If[n==1,{{}},Join@@Table[Tuples[aot/@c],{c,Join@@Permutations/@IntegerPartitions[n-1]}]];
Table[Length[Select[aot[n],FreeQ[#,{_,x_,_,{_,x_,_},_}|{_,{_,x_,_},_,x_,_}]&]],{n,10}]

A358454 Number of weakly transitive ordered rooted trees with n nodes.

Original entry on oeis.org

1, 1, 1, 3, 6, 13, 33, 80, 201, 509, 1330, 3432, 8982, 23559, 62189
Offset: 1

Views

Author

Gus Wiseman, Nov 18 2022

Keywords

Comments

We define an unlabeled ordered rooted tree to be weakly transitive if every branch of a branch of the root is itself a branch of the root.

Examples

			The a(1) = 1 through a(6) = 13 trees:
  o  (o)  (oo)  (ooo)   (oooo)   (ooooo)
                ((o)o)  ((o)oo)  ((o)ooo)
                (o(o))  ((oo)o)  ((oo)oo)
                        (o(o)o)  ((ooo)o)
                        (o(oo))  (o(o)oo)
                        (oo(o))  (o(oo)o)
                                 (o(ooo))
                                 (oo(o)o)
                                 (oo(oo))
                                 (ooo(o))
                                 ((o)(o)o)
                                 ((o)o(o))
                                 (o(o)(o))

Crossrefs

The unordered version is A290689, ranked by A290822.
The directed version is A358453.
A000081 counts rooted trees.
A306844 counts anti-transitive rooted trees.
Cf. A318185, A324695, A324751, A324756, A324758, A324764-A324768, A324838, A324840, A324844, A358456.

Programs

  • Mathematica
    aot[n_]:=If[n==1,{{}},Join@@Table[Tuples[aot/@c],{c,Join@@Permutations/@IntegerPartitions[n-1]}]];
Table[Length[Select[aot[n],Complement[Union@@#,#]=={}&]],{n,10}]

A358455 Number of recursively anti-transitive ordered rooted trees with n nodes.

Original entry on oeis.org

1, 1, 2, 4, 10, 26, 72, 206, 608, 1830, 5612, 17442, 54866, 174252, 558072, 1800098
Offset: 1

Views

Author

Gus Wiseman, Nov 18 2022

Keywords

Comments

We define an unlabeled ordered rooted tree to be recursively anti-transitive if no branch of a branch of a subtree is a branch of the same subtree farther to the left.

Examples

			The a(1) = 1 through a(5) = 10 trees:
  o  (o)  (oo)   (ooo)    (oooo)
          ((o))  ((o)o)   ((o)oo)
                 ((oo))   ((oo)o)
                 (((o)))  ((ooo))
                          (((o))o)
                          (((o)o))
                          (((oo)))
                          ((o)(o))
                          (o((o)))
                          ((((o))))

Crossrefs

The unordered version is A324765, ranked by A324766.
The undirected version is A358456.
A000108 counts ordered rooted trees, unordered A000081.
A306844 counts anti-transitive rooted trees.
A358453 counts transitive ordered trees, unordered A290689.
Cf. A318185, A324695, A324751, A324756, A324758, A324764, A324767, A324768, A324838, A324840, A324844.

Programs

  • Mathematica
    aot[n_]:=If[n==1,{{}},Join@@Table[Tuples[aot/@c],{c,Join@@Permutations/@IntegerPartitions[n-1]}]];
Table[Length[Select[aot[n],FreeQ[#,{_,x_,_,{_,x_,_},_}]&]],{n,10}]
Showing 1-10 of 14 results. Next

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.