=1+0.1,ymin=5.84,ymax=100),
fill="#7fa7d8")+
geom_rect(aes(xmin=2-0.1,xmax=2+0.1,ymin=0...){
p11+
annotate(geom = "text",
x=x[i],
y=y[i],
label...y=c(1,1,1,1),
group=c("A","B","C","D"))
dflegend
ggplot(data=dflegend,aes(x=x,y...,x=2.1,y=1,
label="Un-aligned",hjust=0,
size=5) -> p2
p2
采用拼图的形式将图例和主图组合到一起
library...,数据是和代码写到一起了,代码直接在推文中复制就行