从分组点创建不重叠的多边形

Question

我有一些城镇的位置数据。我可以根据接近程度和某些价值将它们归类为“地区”。如何创建空间多边形数据框来捕获城镇群而不重叠，即，各组之间有边界/线？

library(ggplot2)
x = rnorm(100)
y = rnorm(100)

x.terr<-as.factor((x<=-1.5)+(x<=-0)+(x<=1.5)+(x<Inf))
y.terr<-as.factor((y<=-1.5)+(y<=-0)+(y<=1.5)+(y<Inf))
terr<-unclass(x.terr)+unclass(y.terr)


Dat = data.frame(x,y,terr)
ggplot(data=Dat)+geom_point(aes(x=x,y=y,color=as.factor(terr)))+
  labs(color="Territory")

所需的输出：