如何使用trycatch跳过错误并转到列表中的下一个

Question

我想从rtf文件中的文件夹中解析rtf文件，该文件夹在lapply步骤中导致错误。

我刚开始使用trycatch，那么如何将其合并到我的代码中（lapply步骤）来忽略错误并继续解析下一个rtf文件？

Answer 1

这对您有用吗？

yourFunction <- function(x) {
  rtf <- read_rtf(x, verbose = FALSE, row_start = "*| ", row_end = "",
                  cell_end = " | ", ignore_tables = FALSE, check_file = TRUE)

  text <- unlist(strsplit(rtf, "\\."))

  toMatch <- c("bitcoin", "fund")
  matches <- unique(grep(paste(toMatch,collapse="|"), 
                         text, value=TRUE))
  matches <- data.frame(matches)
}

results = lapply(files, function(x){
  tryCatch(yourFunction(x), 
           error = function(e)print(paste(x, 'did not want')), 
           finally = 0)})

Answer 2

这是什么？

(env) C:\Users\username\myproject