小编EB7*_*B77的帖子

我有一个数据框，我想以 4 个方面（按 ID）的形式呈现，并且对于每个方面，用矩形突出显示数据。

我的数据是：

dt<-data.frame(ID=c(rep(c("1","2","3","4"),2)),var=c(480,1180,170,130,500,1180,1450,750),
                 Method=c(rep(c("A","B"),each=4)))

我能找到的所有其他相关帖子都参考了创建一个新的数据框，其中每个矩形的信息作为单独的行。因此，我创建了以下数据框：

rect<-data.frame(xmin = c(0.8, 0.8,0.8,0.8), xmax = c(2.2, 2.2, 2.2, 2.2), 
           ymin = c(430, 1130, 120, 80), ymax = c(550, 1230, 1500, 800), 
           alpha = c(.1, .1, .1, .1),
           fill = c("red", "green","orange","blue"))

我的 ggplot 代码是：

ggplot(dt,aes(x=Method,y=var)) +
  geom_point() +
  annotate("rect", xmin = rect$xmin, xmax = rect$xmax, ymin = rect$ymin, ymax = rect$ymax,
           alpha = 0.1, fill = "green")+
  facet_wrap(~ID,ncol=4)+
  theme_bw()

这给了我以下内容：

geom_rect 选项对我来说根本不起作用。我只是收到有关缺少变量的错误消息。我已将 ID 和 Method 列添加到 rect 数据框中，但这只会引发 var 变量不存在的问题。我考虑过将其全部合并，但我不确定这是否能解决问题。这是我尝试与 geom_rect …