删除ggplot2 geom_polygon缓冲

Question

我目前正在根据ggplot2网站geom_polygon上提供的示例来绘制三个多边形。 但是，尽管设置了xlim和ylim，但似乎仍然在图像周围强加了一些缓冲，是否有办法消除这种缓冲，使多边形移到边缘？

library(ggplot2)

ids <- factor(1:3)
values <- data.frame(
  id = ids,
  value = 1:3)

positions <- data.frame(
  id = rep(ids, each=4),
  x = c( -3, 0, 0, -3,
         -3, 0, 3, -3,
          0, 3, 3, 0 ),
  y = c( -3,-3, 0, 0,
          0, 0, 3, 3,
         -3,-3, 3, 0 )
  )

datapoly <- merge( values, positions, by=c('id'))

mnp.latent.plot <- ggplot(datapoly, aes(x=x,y=y, alpha=0.5)) +
geom_polygon(aes(fill=value, group=id)) + xlim(-3,3) + ylim(-3,3) +   
guides(fill=FALSE,alpha=FALSE)

plot(mnp.latent.plot)

Answer 1

将xlim和ylim放在coord_cartesian ：

mnp.latent.plot <- ggplot(datapoly, aes(x = x, y = y, alpha = 0.5)) + 
  geom_polygon(aes(fill = value, group = id)) + 
  guides(fill = FALSE, alpha = FALSE) + coord_cartesian(xlim = c(-3, 3), ylim = c(-3, 3))

plot(mnp.latent.plot)