R tidyr extract 不捕获多行表达式

Question

我有一个带有多行字符串的 tibble，我想使用 tidyr::extract 使用正则表达式组提取变量，其中值是多行字符串。但是，在以下示例中，我没有提取 - 分隔的组。

library(tidyverse)

df <- tibble(x = "12\n34-56\n78-90\n12")

my_regex <- regex("(.*)-(.*)-(.*)", multiline = TRUE, dotall = TRUE)

extract(df, x, c("y", "z", "a"), my_regex)
#> # A tibble: 1 x 3
#>   y     z     a    
#>   <chr> <chr> <chr>
#> 1 <NA>  <NA>  <NA>

正则表达式本身没有问题，如 stringr::str_view 所示。

str_view(df$x, my_regex)

这是 tidyr::extract 的已知错误或功能吗？（请注意，我的实际问题更复杂，不适用于 tidyr::separate 像这样。）

Answer 1

tidyr 只是不支持 stringr::regex 的输出 这不是错误，请参阅：https://github.com/tidyverse/tidyr/issues/749 和 https://github.com/tidyverse/tidyr/issues/693

你可以这样做：

library(tidyverse)

df <- tibble(x = "12\n34-56\n78-90\n12")
extract(df, x, c("y", "z", "a"), regex = "(?s)(.*)-(.*)-(.*)")
#> # A tibble: 1 x 3
#>   y        z        a       
#>   <chr>    <chr>    <chr>   
#> 1 "12\n34" "56\n78" "90\n12"

^{由reprex package (v0.3.0) 于 2019 年 9 月 18 日创建}