geom_mark_hull() with extra large space

[andresfjaramillo]

Hi Thomas,

I'm constructing some basic hulls surrounding the points, but for one group gets an extra large space.I understand that this was fixed for groups with less than two observations.

mds_points<-data.frame("Dim1"=c(-0.0005302627,0.0244285080,0.0265060161,-0.0081200544,-0.0098483091,-0.0081200544,-0.0098483091,-0.0045749060,-0.0098926286),"Dim2"=c(0.0245328673,-0.0026370658,-0.0034842113,-0.0028471845,-0.0041339975,-0.0028471845,-0.0041339975,-0.0003568991,-0.0040923272),"Specie"=c("B sp 38","B sp 39","B sp 39","B sp 40","B sp 40","B sp 40","B sp 40","B sp 40","B sp 40"))

ggplot(data = mds_points, aes(x = Dim1,y = Dim2, fill=Specie))+
geom_point(color="black",size=8,shape=21)+
geom_mark_hull()

Best
Andrés