Skip to content

AdjacentTranspositions ​

Two-cycles (i, i+1).

✓ checked against that system · ! checked, with disagreements (hover a chip)FindStatSt001465via Permutation✓
AdjacentTranspositions(p)Two-cycles (i, i+1).
Typed signatures
TypePackageApplies
(permutation) -> numbercombinatoricsalways

Domain: Permutation statistics

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

0 if Length(_x) < 2 else Count(Filter(
                                       Range(1, Length(_x) - 1, 1),
                                       Function(
                                                 _x[i] == i + 1 && _x[i + 1] ==
                                                                   i,
                                                 i,
                                               ),
                                     ))

Examples

Basic #

the one-line word 312312

live ↗
InAdjacentTranspositions(Permutation⁡([3,1,2]))\mathrm{AdjacentTranspositions}({\operatorname{Permutation}}([3, 1, 2]))Out00

the one-line word 24132413

live ↗
InAdjacentTranspositions(Permutation⁡([2,4,1,3]))\mathrm{AdjacentTranspositions}({\operatorname{Permutation}}([2, 4, 1, 3]))Out00
Properties #

FindStat's value for [1]

live ↗
InCombinatorialStat(Permutation⁡([1]),AdjacentTranspositions)\mathrm{CombinatorialStat}({\operatorname{Permutation}}([1]), \text{AdjacentTranspositions})Out00

Known value · FindStat St001465

FindStat's value for [1,2]

live ↗
InCombinatorialStat(Permutation⁡([1,2]),AdjacentTranspositions)\mathrm{CombinatorialStat}({\operatorname{Permutation}}([1, 2]), \text{AdjacentTranspositions})Out00

Known value · FindStat St001465

FindStat's value for [2,1]

live ↗
InCombinatorialStat(Permutation⁡([2,1]),AdjacentTranspositions)\mathrm{CombinatorialStat}({\operatorname{Permutation}}([2, 1]), \text{AdjacentTranspositions})Out11

Known value · FindStat St001465

About
Examples5
CrosswalkFindStat