将 geom_point 与 geom_polygon 分组

Jel*_*llz 5 r polygon ggplot2

我的数据集:

Taxa    dn  dc
Cha    10.2 -20.4
Cha    10.7 -19.7
Cha    4.9  -21.0
Cha    5.4  -20.6
Cha    8.6  -21.2
Cha    8.0  -20.9
Cha    8.1  -21.3
Cha    6.9  -21.1
Cha    8.5  -21.1
Cha    9.1  -20.8
Hyd    6.6  -19.2
Hyd    10.2 -17.0
Hyd    9.7  -18.2
Hyd    8.1  -16.5
Hyd    8.8  -15.8
Hyd    8.7  -15.8
Hyd    7.6  -18.3
Hyd    8.9  -16.0
Hyd    8.4  -17.5
Hyd    9.8  -18.8
Hyd    8.3  -18.4
Scy    9.4  -20.1
Scy    9.1  -20.0
Scy    7.8  -20.2
Scy    9.1  -17.6
Scy    8.2  -19.8
Scy    9.4  -19.2
Scy    9.0  -20.1
Sip    5.7  -15.2
Sip    6.2  -18.6
Sip    5.6  -18.0
Sip    8.6  -17.6
Sip    4.8  -16.9
Sip    5.2  -15.4
Sip    1.9  -18.4
Run Code Online (Sandbox Code Playgroud)

我使用的代码是:

library(ggplot2)
ggplot(mydata, aes(x=dC, y=dN, colour=Taxa, shape=Taxa))+
  geom_point(size=2, alpha=0.5)+
  geom_polygon(aes(fill=Taxa, group=Taxa))+
  theme(legend.position = "none")
Run Code Online (Sandbox Code Playgroud)

我想在我的数据中用“Taxa”绘制多边形组。但是,看起来多边形连接每个点。

多边形

我想要的就是这个。我应该如何编辑我的代码?

多边形2

PoG*_*bas 5

要连接组中的外部点并包围组内的点,请使用包geom_encircle中的函数ggalt

library(ggplot2)
library(ggalt)
ggplot(mydata, aes(dc, dn)) +
    geom_point(aes(color = Taxa)) +
    geom_encircle(aes(fill = Taxa), s_shape = 1, expand = 0,
                  alpha = 0.2, color = "black", show.legend = FALSE)
Run Code Online (Sandbox Code Playgroud)

使用s_shape = 1expand = 0连接外部点,否则会出现边距包围。

在此输入图像描述