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.

A179752 Maximum depth of parenthesizations encoded by A014486, or correspondingly, maximum height for the equivalent general trees.

Original entry on oeis.org

0, 1, 1, 2, 1, 2, 2, 2, 3, 1, 2, 2, 2, 3, 2, 2, 2, 2, 3, 3, 3, 3, 4, 1, 2, 2, 2, 3, 2, 2, 2, 2, 3, 3, 3, 3, 4, 2, 2, 2, 2, 3, 2, 2, 2, 2, 3, 3, 3, 3, 4, 3, 3, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 5, 1, 2, 2, 2, 3, 2, 2, 2, 2, 3, 3, 3, 3, 4, 2, 2, 2, 2, 3, 2, 2, 2, 2, 3, 3, 3, 3, 4, 3, 3, 3, 3, 3, 3, 3, 3, 4
Offset: 0

Views

Author

Antti Karttunen, Aug 03 2010

Keywords

Comments

Each integer n appears first at position given by A014138.

Examples

			The terms A014486[1..8] encode the following rooted plane general trees:
.1.......2.......3.......4.......5.......6.......7.......8.
...........................................................
.........................................................o.
.........................................................|.
.................o.................o...o.......o...o.....o.
.................|.................|...|........\./......|.
.o.....o...o.....o.....o.o.o...o...o...o...o.....o.......o.
.|......\./......|......\|/.....\./.....\./......|.......|.
.*.......*.......*.......*.......*.......*.......*.......*.
and the corresponding parenthesizations:
.().....()()....(())...()()()..()(())..(())()..(()())..((()))
thus a(1)=1, a(2)=1, a(3)=2, a(4)=1, a(5)=2, a(6)=2, a(7)=2, a(8)=3.
		

Crossrefs

Programs

  • Mathematica
    blist[m_] := Select[Map[Accumulate, Permutations[PadLeft[Table[1, m], 2*m, -1]]], Min[#] >= 0 &]; Join[{{0}}, Array[Map[Max, blist[#]] &, 6]] (* Paolo Xausa, Mar 04 2024 *)