能否像ggplot一样通过管道传递数据给ggmap实现流式绘图？

有两种简洁的方式可以实现你想要的管道工作流，无需额外保存处理后的数据：

方法1：用大括号管道捕获数据 #

通过%>% { ... }的代码块形式，可以在ggmap的图层组合中引用管道传递过来的处理后数据：

background = get_stamenmap(bbox = c(left = -122.5, bottom = 37.7, right = -122.3, top = 37.8))

data %>% 
  filter(route %in% c('01','08','15')) %>% 
  {
    ggmap(background) +
      geom_sf(data = ., inherit.aes = FALSE) +
      geom_sf_text(data = ., aes(label = route), inherit.aes = FALSE)
  }

关键注意点：必须设置inherit.aes = FALSE，因为ggmap生成的ggplot对象自带的美学映射和sf数据不兼容，关闭继承可以避免报错或显示异常。

方法2：先将数据传给ggplot()，再叠加ggmap背景 #

这种方式更贴近你原本的ggplot工作流逻辑：

background = get_stamenmap(bbox = c(left = -122.5, bottom = 37.7, right = -122.3, top = 37.8))

data %>% 
  filter(route %in% c('01','08','15')) %>% 
  ggplot() +
  ggmap(background) +
  geom_sf(inherit.aes = FALSE) +
  geom_sf_text(aes(label = route), inherit.aes = FALSE)

这里ggplot()会先接收管道传递的处理后数据，后续的ggmap图层作为背景叠加，sf图层则直接使用ggplot()中的数据（同样需要关闭美学继承）。

为什么之前的写法无效？ #

ggmap(background)会直接生成一个独立的ggplot对象，管道传递的数据不会被这个对象接收；后续的geom_sf()默认会使用ggmap对象中的内部数据（而非你处理后的sf数据），因此找不到route等字段，导致代码失效。

内容的提问来源于stack exchange，提问作者stobot