InterlacingNumber
Pairs of blocks whose i-th arcs interlace, each block closed by an arc to infinity.
✓ checked against that system · ! checked, with disagreements (hover a chip)FindStat
St001781via SetPartition✓InterlacingNumber(partition)Pairs of blocks whose i-th arcs interlace, each block closed by an arc to infinity.Typed signatures
| Type | Package | Applies |
|---|---|---|
(set_partition) -> number | combinatorics | always |
Details
- Defined over
SetPartitionas an expression in_x, evaluated by compute-engine — the definition IS the implementation. - Takes a
SetPartitionand 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 SetPartition, over _x
0 if Length(_x) < 2 else Apply((il_n: integer) => Sum(Map(
Function(Apply((il_s: list<integer>) => Sum(Map(
Function(Apply((il_t: list<integer>) => Count(Filter(
Range(1, Min(Length(il_s), Length(il_t))),
Function((il_n + 1 if i > Length(il_s) else il_s[i]) <
(il_n + 1 if i > Length(il_t) else il_t[i]) &&
(il_n + 1 if i > Length(il_t) else il_t[i]) <
(il_n + 1 if i + 1 >
Length(il_s) else il_s[i + 1]) &&
(il_n + 1 if i + 1 >
Length(il_s) else il_s[i + 1]) <
(il_n + 1 if i + 1 >
Length(il_t) else il_t[i + 1]) ||
(il_n + 1 if i > Length(il_t) else il_t[i]) <
(il_n + 1 if i > Length(il_s) else il_s[i]) &&
(il_n + 1 if i > Length(il_s) else il_s[i]) <
(il_n + 1 if i + 1 >
Length(il_t) else il_t[i + 1]) &&
(il_n + 1 if i + 1 >
Length(il_t) else il_t[i + 1]) <
(il_n + 1 if i + 1 >
Length(il_s) else il_s[i + 1]), i),
)), _x[t]), t),
Range(s + 1, Length(_x)),
)), _x[s]), s),
Range(1, Length(_x) -
1),
)), Length(Flatten(_x)))Examples
Properties #
About
| Examples | 5 |
|---|---|
| Crosswalk | FindStat |