tryCatch（）问题

Question

我正在尝试在R中构建一个如下所示的脚本：

randomlist <- list(x=ran1, y=ran2) #{x,y}
contour <- Conte(c(round(randomlist$x),round(randomlist$y)),img@grey)
#if Conte function returns me an error, then get new randomlist values
#Do until it doesn't returns an error

如果随机{x,y}在图像区域内{x,y}则该函数返回轮廓图像的坐标。 我知道这也许是愚蠢的，不是很明确的问题，但是我不擅长R，错误处理对我来说很混乱。 我尝试了tryCatch()但我不知道如何应用它。 非常感谢你！

Answer 1

可复制的代码会有所帮助。 我通常用try来处理这类问题：

temp <- function(N) {
  if (N < 0) stop("Error")
  return(N)
}

out <- 0 
n <- 0 
out <- try(temp(rnorm(1)))
while(class(out) == "try-error") {
 n <- n + 1
 print(n) 
 out <- try(temp(rnorm(1))) 
}  
out