Skip to content

PartsEqualOne ​

Parts equal to 1.

✓ checked against that system · ! checked, with disagreements (hover a chip)FindStatSt000475via IntegerPartition✓
PartsEqualOne(partition)Parts equal to 1.
Typed signatures
TypePackageApplies
(composition | integer_partition) -> numbercombinatoricsalways

Domain: Partition statistics

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

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

Examples

Basic #

the partition 4+2+14 + 2 + 1 of 77

live ↗
InPartsEqualOne(IntegerPartition⁡([4,2,1]))\mathrm{PartsEqualOne}({\operatorname{IntegerPartition}}([4, 2, 1]))Out11

the partition 3+3+13 + 3 + 1 of 77

live ↗
InPartsEqualOne(IntegerPartition⁡([3,3,1]))\mathrm{PartsEqualOne}({\operatorname{IntegerPartition}}([3, 3, 1]))Out11

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

live ↗
InPartsEqualOne(IntegerComposition⁡([2,1,3,1,1]))\mathrm{PartsEqualOne}({\operatorname{IntegerComposition}}([2, 1, 3, 1, 1]))Out33
Properties #

FindStat's value for [1]

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

Known value · FindStat St000475

FindStat's value for [2]

live ↗
InCombinatorialStat(IntegerPartition⁡([2]),PartsEqualOne)\mathrm{CombinatorialStat}({\operatorname{IntegerPartition}}([2]), \text{PartsEqualOne})Out00

Known value · FindStat St000475

FindStat's value for [3]

live ↗
InCombinatorialStat(IntegerPartition⁡([3]),PartsEqualOne)\mathrm{CombinatorialStat}({\operatorname{IntegerPartition}}([3]), \text{PartsEqualOne})Out00

Known value · FindStat St000475

About
Examples6
CrosswalkFindStat