Fix #249 by adding do_union = FALSE.

ropensci · May 26, 2018 · 73190fe · 73190fe
1 parent 81b3cdc
commit 73190fe
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/SpatialLinesNetwork.R b/R/SpatialLinesNetwork.R
@@ -565,7 +565,7 @@ sum_network_routes <- function(sln, start, end, sumvars, combinations = FALSE) {
         crs = sf::st_crs(sln@sl)$epsg
       ) %>%
       dplyr::group_by(.data$linenum) %>%
-      dplyr::summarise() %>%
+      dplyr::summarise(do_union = FALSE) %>%
       sf::st_cast("LINESTRING") %>%
       dplyr::bind_cols(routedata) %>%
       dplyr::select(-.data$linenum)