From 1c3d2c3ec16150d5aae4dc35b4e3f60afa3d5b08 Mon Sep 17 00:00:00 2001
From: Elio Campitelli <eliocampitelli@gmail.com>
Date: Tue, 15 Oct 2024 13:16:22 +1100
Subject: [PATCH] Fixes wrong step

---
 R/geom_streamline.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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)])
 }