Fix error in distanceTransform's target parameter

swarm-lab · Dec 4, 2023 · e581bc0 · e581bc0
1 parent 369c960
commit e581bc0
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/transform.R b/R/transform.R
@@ -851,7 +851,7 @@ distanceTransform <- function(image, distance_type = "L1", mask_size = 3,
   if (isImage(target)) {
     `_distanceTransform`(image, dt, mask_size, target)
   } else if (target == "self") {
-    `_distanceTransform`(image, dt, mask_size, target)
+    `_distanceTransform`(image, dt, mask_size, image)
   } else if (target == "new") {
     out <- zeros(nrow(image), ncol(image), 1, "32F")
     `_distanceTransform`(image, dt, mask_size, out)