Blockades

library(dplyr)

Attaching package: 'dplyr'

The following objects are masked from 'package:stats':

    filter, lag

The following objects are masked from 'package:base':

    intersect, setdiff, setequal, union

library(stringr)
library(magrittr)

#install.packages("tidyverse")
ICBe = readr::read_rds(here::here("data", "raw", "ICBe_V1.1_events_agreed.Rds"))

ICBe_blockades <- ICBe %>%
  dplyr::filter(stringr::str_detect(interact_escalate, "blockade"))