如图，R语言中怎样实现空间聚类？即每一个大类中包括同等数量的小类（黑红两色点），并且聚合后形成的多边形互不重叠，谢谢