Skip to content

BoxesBelowOnePeak ​

The boxes between the path and the diagonal that lie right of and below exactly one peak.

✓ checked against that system · ! checked, with disagreements (hover a chip)FindStatSt000984via DyckPath✓
BoxesBelowOnePeak(path)The boxes between the path and the diagonal that lie right of and below exactly one peak.
Typed signatures
TypePackageApplies
(dyck_path) -> numbercombinatoricsalways

Domain: Dyck path statistics

Details
  • Defined over DyckPath as an expression in _x, evaluated by compute-engine — the definition IS the implementation.
  • Takes a DyckPath and nothing else — it reads values against their positions, or walks the orbits, so it needs the bijection. Applying it to a bare list is a type error, not a wrong answer.

Definition

Epsil, as the implementation runs it.

on DyckPath, over _x

0 if Length(_x) < 2 else Apply(
                                (pu: list<integer>) => Apply(
                                                              (pd: list<integer>) => Apply(
                                                                                            (downs: list<integer>) => Sum(Map(
                                                                                                                               Function(0 if downs[k] - k <
                                                                                                                                             k + 1 else Count(Filter(
                                                                                                                                                                 Range(k, downs[k] - k -
                                                                                                                                                                          1),
                                                                                                                                                                 Function(Count(Filter(Range(1, Length(pu)), Function(pd[q] < k &&
                                                                                                                                                                                                                      pu[q] > c, q))) ==
                                                                                                                                                                          1, c),
                                                                                                                                                               )), k),
                                                                                                                               Range(1, Length(_x) / 2),
                                                                                                                             )),
                                                                                            Filter(
                                                                                                    Range(1, Length(_x)),
                                                                                                    Function(_x[i] == 0, i),
                                                                                                  ),
                                                                                          ),
                                                              Map(
                                                                   Function(i -
                                                                            Count(Filter(
                                                                                          Range(1, i),
                                                                                          Function(_x[k] == 1, k),
                                                                                        )), i),
                                                                   Filter(
                                                                           Range(1, Length(_x) - 1),
                                                                           Function(_x[i] == 1 &&
                                                                                    _x[i + 1] ==
                                                                                    0, i),
                                                                         ),
                                                                 ),
                                                            ),
                                Map(
                                     Function(
                                               Count(Filter(
                                                             Range(1, i),
                                                             Function(
                                                                       _x[k] ==
                                                                       1,
                                                                       k,
                                                                     ),
                                                           )),
                                               i,
                                             ),
                                     Filter(
                                             Range(1, Length(_x) - 1),
                                             Function(_x[i] == 1 && _x[i + 1] ==
                                                                    0, i),
                                           ),
                                   ),
                              )

Examples

Basic #

the step word UUDDUDUUDDUD

live ↗
InBoxesBelowOnePeak(DyckPath⁡([1,1,0,0,1,0]))\mathrm{BoxesBelowOnePeak}({\operatorname{DyckPath}}([1, 1, 0, 0, 1, 0]))Out11

the step word UDUUDDUDUUDD

live ↗
InBoxesBelowOnePeak(DyckPath⁡([1,0,1,1,0,0]))\mathrm{BoxesBelowOnePeak}({\operatorname{DyckPath}}([1, 0, 1, 1, 0, 0]))Out11
Properties #

FindStat's value for [1,0,1,0]

live ↗
InCombinatorialStat(DyckPath⁡([1,0,1,0]),BoxesBelowOnePeak)\mathrm{CombinatorialStat}({\operatorname{DyckPath}}([1, 0, 1, 0]), \text{BoxesBelowOnePeak})Out00

Known value · FindStat St000984

FindStat's value for [1,1,0,0]

live ↗
InCombinatorialStat(DyckPath⁡([1,1,0,0]),BoxesBelowOnePeak)\mathrm{CombinatorialStat}({\operatorname{DyckPath}}([1, 1, 0, 0]), \text{BoxesBelowOnePeak})Out11

Known value · FindStat St000984

FindStat's value for [1,0,1,0,1,0]

live ↗
InCombinatorialStat(DyckPath⁡([1,0,1,0,1,0]),BoxesBelowOnePeak)\mathrm{CombinatorialStat}({\operatorname{DyckPath}}([1, 0, 1, 0, 1, 0]), \text{BoxesBelowOnePeak})Out00

Known value · FindStat St000984

About
Examples5
CrosswalkFindStat