Important: The group package has been deprecated. Use the superseding command GroupTheory[Center] instead.

This function finds the largest subgroup of the permutation group pg in which every element commutes with every element of pg. The result is returned as an unevaluated permgroup call.

The command with(group,center) allows the use of the abbreviated form of this command.

$\mathrm{with}\left(\mathrm{group}\right)\:$

$\mathrm{center}\left(\mathrm{permgroup}\left(5\,\left\{\left[\left[1\,2\,3\,4\,5\right]\right]\,\left[\left[2\,5\right]\,\left[3\,4\right]\right]\right\}\right)\right)$

$\mathrm{permgroup}\left(5\,\varnothing \right)$