R: ggplot2 在 annotate(geom="label"...) 中更改文本周围框的边距

问题描述

有没有办法控制文本周围框的边距大小?

x <- data.frame(x = c(5,10),y = c(0.5,1))

ggplot(data=x,aes(x,y)) +
  geom_bar(stat = 'identity',fill=c("red4","cornflowerblue"))+
  annotate(geom= "label",x=5,y=.6,label="Just\ntext\nhere\nwith\ndifferent\nmargins",size=5)

enter image description here

解决方法

有参数 label.padding。见documentation

ggplot(data=x,aes(x,y)) + 
  geom_bar(stat = 'identity',fill=c("red4","cornflowerblue")) + 
  annotate(geom= "label",x=5,y=.6,label="Just\ntext\nhere\nwith\ndifferent\nmargins",size=5,label.padding=unit(4,"lines"))    # <------------