Garrick Aden-Buie пре 6 година
родитељ
комит
f247ae89ad
1 измењених фајлова са 3 додато и 3 уклоњено
  1. +3
    -3
      R/regex.R

+ 3
- 3
R/regex.R Прегледај датотеку

@@ -94,9 +94,9 @@ wrap_result <- function(x, escape = FALSE, exact = FALSE) {
collapse_span_inserts(inserts)
} else {
inserts %>%
tidyr::nest(-.data$pass) %>%
mutate(data = purrr::map(.data$data, collapse_span_inserts)) %>%
tidyr::unnest() %>%
tidyr::nest(spans = -.data$pass) %>%
mutate(spans = purrr::map(.data$spans, collapse_span_inserts)) %>%
tidyr::unnest(.data$spans) %>%
group_by(.data$loc, .data$type) %>%
summarize(insert = paste(.data$insert, collapse = "")) %>%
dplyr::ungroup()

Loading…
Откажи
Сачувај