Skip to content

GreatestCommonDivisorOfParts ​

The greatest common divisor of the parts.

✓ checked against that system · ! checked, with disagreements (hover a chip)FindStatSt000667via IntegerPartition✓
GreatestCommonDivisorOfParts(partition)The greatest common divisor of the parts.
Typed signatures
TypePackageApplies
(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 Fold(
                               Function(a * b / LCM(a, b), a, b),
                               _x[1],
                               Rest(_x),
                             )

Examples

Basic #

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

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

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

live ↗
InGreatestCommonDivisorOfParts(IntegerPartition⁡([3,3,1]))\mathrm{GreatestCommonDivisorOfParts}({\operatorname{IntegerPartition}}([3, 3, 1]))Out11
Properties #

FindStat's value for [1]

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

Known value · FindStat St000667

FindStat's value for [2]

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

Known value · FindStat St000667

FindStat's value for [3]

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

Known value · FindStat St000667

About
Examples5
CrosswalkFindStat