首页 > 解决方案 > 有什么方法可以执行多重过滤?

问题描述

我有一个关于车祸的数据集,我想根据到目前为止我已经单独完成它们的位置进行过滤,但是要制作一个我已应用的所有过滤器都执行的数据集。

library(sf)

# reading spatial data
crash_geo <- st_read("Crash_Analysis_System_(CAS)_data.geojson")

crash_geo <- crash_geo %>% 
  filter(!is.na(region))

# filtering
# filtering nelson
crashes_nelson <- crash_geo %>% 
  st_filter(crash_geo %>% filter(region == "Nelson Region"))

# filtering tasman
crashes_tasman <- crash_geo %>% 
  st_filter(crashes_csv %>% filter(region == "Tasman Region"))

# filtering malborough
crashes_malborough <- crash_geo %>% 
  st_filter(crash_geo %>% filter(region == "Malborough Region"))

# filtering canterbury
crashes_malborough <- crash_geo %>% 
  st_filter(crash_geo %>% filter(region == "Canterbury Region"))

# filtering west coast
crashes_malborough <- crash_geo %>% 
  st_filter(crash_geo %>% filter(region == "West Coast Region"))

# filtering otago
crashes_malborough <- crash_geo %>% 
  st_filter(crash_geo %>% filter(region == "Otago Region"))

# filtering southland
crashes_malborough <- crash_geo %>% 
  st_filter(crash_geo %>% filter(region == "Southland Region"))

我想将所有这些过滤器合并为一个,我将如何执行此操作。

标签: rfilteringsf

解决方案


推荐阅读