Skip to content

ShortestConstantRun ​

The length of the shortest run of equal parts.

✓ checked against that system · ! checked, with disagreements (hover a chip)FindStatSt000900via IntegerComposition✓
ShortestConstantRun(composition)The length of the shortest run of equal parts.
Typed signatures
TypePackageApplies
(composition) -> numbercombinatoricsalways

Domain: Composition statistics

Details
  • Defined over IntegerComposition as an expression in _x, evaluated by compute-engine — the definition IS the implementation.
  • Takes a IntegerComposition 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 IntegerComposition, over _x

0 if Length(_x) < 1 else Min(Rest(Fold(
                                        Function(ReplaceAt(
                                                            a,
                                                            Length(a),
                                                            Last(a) + 1,
                                                          ) if b == a[1] else Join(
                                                                                   ReplaceAt(a, 1, b),
                                                                                   [1],
                                                                                 ), a, b),
                                        [0],
                                        _x,
                                      )))

Examples

Basic #

the composition [2,1,3,1,1][2,1,3,1,1]

live ↗
InShortestConstantRun(IntegerComposition⁡([2,1,3,1,1]))\mathrm{ShortestConstantRun}({\operatorname{IntegerComposition}}([2, 1, 3, 1, 1]))Out11
Properties #

FindStat's value for [1]

live ↗
InCombinatorialStat(IntegerComposition⁡([1]),ShortestConstantRun)\mathrm{CombinatorialStat}({\operatorname{IntegerComposition}}([1]), \text{ShortestConstantRun})Out11

Known value · FindStat St000900

FindStat's value for [2]

live ↗
InCombinatorialStat(IntegerComposition⁡([2]),ShortestConstantRun)\mathrm{CombinatorialStat}({\operatorname{IntegerComposition}}([2]), \text{ShortestConstantRun})Out11

Known value · FindStat St000900

FindStat's value for [3]

live ↗
InCombinatorialStat(IntegerComposition⁡([3]),ShortestConstantRun)\mathrm{CombinatorialStat}({\operatorname{IntegerComposition}}([3]), \text{ShortestConstantRun})Out11

Known value · FindStat St000900

About
Examples4
CrosswalkFindStat