From 6dc7f0f88f3a7fe25409ef75d4e37a50679e2ee4 Mon Sep 17 00:00:00 2001
From: Alexios Galanos <alexios@4dscape.com>
Date: Mon, 22 Apr 2024 17:37:34 -0700
Subject: [PATCH] fix to predict sampling

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

diff --git a/R/predict.R b/R/predict.R
index d41b280..66c64a1 100644
--- a/R/predict.R
+++ b/R/predict.R
@@ -500,7 +500,7 @@ sample_block <- function(x, h, nsim, block) {
             .sample_rows(ematrix, no_samples + 3, h = h)
         }))
     }
-    return(nsim)
+    return(zsim)
 }