在facet_wrap（ggplot2）中为每个图指定不同的xlim

Question

那是我的代码：

ggplot(df, aes(Date, EC))+
  scale_x_date(labels= date_format("%Y"), breaks=date_breaks("year"))+
  geom_point(data=df2, aes(Date, EC), size=2, color="red")+ 
  geom_point()+
  geom_line()+
  xlab(NULL)+
  geom_smooth(method="lm", se=F)+
  facet_wrap(~ID, scales="free_y")+
  theme(axis.text.x = element_text(angle = 90))

这将产生以下结果（我知道它很丑，但请把它只当作一个例子）：

在facet_wrap中，我可以为每个图指定不同的xlim（基于日期值）吗？如果我可以基于min（df $ Date）指定xlim，那就太好了。

希望我表达清楚。

- matteo

---

дёәд»Җд№ҲдёҚеңЁfacet_wrap()дёӯдҪҝз”Ёscales = "free"жқҘиҮӘз”ұеҢ–xе’Ңyзҡ„жҜ”дҫӢе°әе‘ўпјҹ - Simon O'Hanlon

是的，这可能是一个机会。 - matteo

这个问题仍未解决。虽然使用了scales = "free"，但仍有几个点位于边缘位置。特别是当您向这些点添加文本时，文本只会显示部分内容。对于这个问题有什么建议吗？ - pengchy

Answer 1

这个问题应该被解决了。尝试使用一些广泛的数据进行测试：

data <- data.frame( grp=rep(c("one","two","three","four"), each=10),
                    x=1:40,
                    y=c( runif(10)*3,
                       ( runif(10)*30 )+10,
                       ( runif(10)*50 )+10,
                       ( runif(10)*10 )-10 ) )

ggplot( data, aes(x, y) ) +
              geom_point(  ) +
              geom_line( ) +
              geom_smooth( method = "loess" ) +
              facet_wrap( ~grp, scales="free" )

- Andre Wildberg