如何通过在ggplot2中设置“theme(legend.title = element_blank())”来删除剩余的多余空间

Question

那里！

我想删除 ggplot2 中的图例标题。我使用了 legend.title = element_blank()，但图例框的顶部仍然有一些额外的空间，即图例标题原来所在的位置。其实我并不想要那个空间。任何人有想法如何解决它？谢谢！

以下是复制不需要的额外空间的代码：

library(ggplot2)
library(grid)
df1 <- data.frame(
  sex = factor(c("Female","Female","Male","Male")),
  time = factor(c("Lunch","Dinner","Lunch","Dinner"), levels=c("Lunch","Dinner")),
  total_bill = c(13.53, 16.81, 16.24, 17.42)
)

# A basic graph
lp <- ggplot(data=df1, aes(x=time, y=total_bill, group=sex, shape=sex)) + geom_line() + geom_point()

lp + theme(legend.title=element_blank(),
           legend.background = element_rect(colour = "black", size = 0.1),
           legend.key.size = unit(0.4, "lines"))

代码片段取自http://www.cookbook-r.com/Graphs/Legends_(ggplot2)/，稍加修改。第一个图例键和图例框的顶部边框之间存在额外的空间。我认为这是因为我调整了密钥大小。当我删除 `legend.key.size = unit(0.4, "lines") 时，一切都很好。然而，我想在我的具体数字中保留这条线。我不确定是否有任何方法可以解决该问题。

Answer 1

这是我第一次回答。theme(legend.margin=margin(t=-0.25,l=0.05,b=0.0,r=0.05,unit='cm')) 负数将空间向内移动。