tidyr-extract.md

From Ben Fitzpatrick. Gist adapted from Nicholas Tierney's

library(tidyverse)
ci <- c('11% - 20%', '21% - 30%', '0% - 9%')
ci %>% 
  as_tibble() %>% 
  extract(value, c("Lw", "Up"), "([0-9]+)% - ([0-9]+)%", convert = TRUE)
#> # A tibble: 3 x 2
#>      Lw    Up
#>   <int> <int>
#> 1    11    20
#> 2    21    30
#> 3     0     9

Created on 2018-03-16 by the reprex package (v0.2.0).