r - 用STOP()终止执行，但不要在R中抛出 “Error”消息

Question

This question already has answers here:

Stop an R program without error

(10个答案)


2年前关闭。




我想要一个函数，当没有数据返回时将终止程序，并向用户显示一条消息，提示找不到新数据。
但是，我不希望我的函数向用户抛出“错误”消息。例如，

my_update_function <- function () {
  df <- data  # get data 
  if (nrow(df) == 0) {
   stop('\r no new data found')
   }
   else {
   # do some updates
   }
}

当前输出:
my_update_function()中的错误:
找不到新数据

我的预期输出: 找不到新数据

如何清除输出消息中的“错误”，但条件为真时终止程序。

最佳答案

这将在控制台上隐藏“错误”一词，但程序仍将其视为错误。引用Stop an R program without error

if (nrow(new_data) == 0) {
    message(log_date, " - ","no new_data is found ")
    opt <- options(show.error.messages=FALSE)
    on.exit(options(opt))
    stop()

}
else { # DO SOMETHING ELSE
}

关于r - 用STOP()终止执行，但不要在R中抛出 “Error”消息，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/50938071/

上一篇：php - 解析错误:syntax error, unexpected T_STRING

下一篇：file - UWP : Catch error when reading file

Answer 1

这将在控制台上隐藏“错误”一词，但程序仍将其视为错误。引用Stop an R program without error

if (nrow(new_data) == 0) {
    message(log_date, " - ","no new_data is found ")
    opt <- options(show.error.messages=FALSE)
    on.exit(options(opt))
    stop()

}
else { # DO SOMETHING ELSE
}