R语言中的异常处理和Java类似,使用了try()语句来捕获异常,不过没有对应的catch()语句。
在使用try()函数捕获异常后,再对捕获的对象进行解析。
try()函数第一个参数为调用的方法,第二个参数为是否显示异常消息。
下面是网友的一个使用异常处理的实例:
count <- 0
inverses <- vector(mode = "list", 100)
repeat {
if (count == 100) break
count <- count + 1
x <- matrix(sample(0:2, 4, replace = T), 2, 2)
x.inv <- try(solve(x), silent=TRUE)
if ('try-error' %in% class(x.inv)) next
else inverses[[count]] <- x.inv
}