PermutationMin

PermutationMin[perm] returns the smallest integer moved by the permutation perm.

Examples

Smallest moved element:

PermutationMin[Cycles[{{1, 3, 5}}]]
(* 1 *)

Larger cycle:

PermutationMin[Cycles[{{4, 7, 9}}]]
(* 4 *)

Identity has no minimum:

PermutationMin[Cycles[{}]]
(* Infinity *)

Please visit the official Wolfram Language Reference for more details.