From b6eef6bc00d59b3218f7eaf6f43d4656bbc9a6d6 Mon Sep 17 00:00:00 2001 From: Michael Hodge Date: Thu, 24 Jan 2019 11:16:35 +0000 Subject: [PATCH] bug fix --- propeR/R/isochrone-multi.R | 2 ++ 1 file changed, 2 insertions(+) diff --git a/propeR/R/isochrone-multi.R b/propeR/R/isochrone-multi.R index bff2587..cf8c4ac 100755 --- a/propeR/R/isochrone-multi.R +++ b/propeR/R/isochrone-multi.R @@ -139,6 +139,7 @@ isochroneMulti <- function(output.dir, if ("try-error" %in% class(t)) { originPoints_removed <- c(originPoints_removed, originPoints$name[num.run]) originPoints_removed_list <- c(originPoints_removed_list, num.run) + end.time <- Sys.time() time.taken[num.run] <- round(end.time - start.time, digits = 2) message("Removed ", originPoints$name[num.run], " from analysis as no polygon could be generated from it.") next @@ -185,6 +186,7 @@ isochroneMulti <- function(output.dir, if ("try-error" %in% class(t)) { originPoints_removed <- c(originPoints_removed, originPoints$name[num.run]) originPoints_removed_list <- c(originPoints_removed_list, num.run) + end.time <- Sys.time() time.taken[num.run] <- round(end.time - start.time, digits = 2) message("Removed ", originPoints$name[num.run], " from analysis as no polygon could be generated from it.") next