单面放大

Question

编辑： 我已经阅读了question，但是（我认为）并不能解决问题。再考虑一下，它有点旧了。也许有人提出了一种不需要进行更多“黑客攻击”的黑客攻击。

在下面提供一些虚拟数据：

dummy_df<-data.frame(A=runif(50,0,5),B=runif(50,5,90),Group=c(1,2))
dummy_df %>% 
  ggplot(aes(A,B))+geom_point()+
  facet_grid(.~Group)+
  coord_cartesian(xlim=c(1,3))

当前图：

如何将最后一次呼叫仅应用到该图的第一个方面？我将其命名为zoom_at(facet_1)。 预先感谢。

Answer 1

可能不完全是您要寻找的东西，但它可能为您提供了另一种处理方式

library(ggforce)
library(tidyverse)
dummy_df<-data.frame(A=runif(50,0,5),B=runif(50,5,90),Group=c(1,2))

dummy_df %>% 
  ggplot(aes(A,B))+geom_point(aes(color=as.factor(Group)))+
  facet_zoom(zoom.data = Group =='2', xlim=c(1,3))