diff --git a/R/geom_streamline.R b/R/geom_streamline.R index 9208c384..43c439b9 100644 --- a/R/geom_streamline.R +++ b/R/geom_streamline.R @@ -545,7 +545,7 @@ streamline.f <- function(field, dt = 0.1, S = 3, skip.x = 1, skip.y = 1, nx = NU points[, group := interaction(group, piece, end)] points[, line := group] - points[, step := seq(0, .N), by = .(group)] + points[, step := seq(1, .N), by = .(group)] return(points[, .(x, y, group, piece, end, step, dx, dy, line)]) }