R Academy · 课时

R 中的错误、警告与消息

Q: 「R 中的错误、警告与消息」这节课中我会学到什么？

了解三种信号类型，以及每种类型在何时产生 你通过在浏览器中直接运行的动手代码来练习 R Academy，全天候 AI 导师会在你学习这节课的过程中回答你的问题。

了解三种信号类型，以及每种类型在何时产生

第 1 / 4 课13 个步骤

R 中的错误、警告与消息 是 CoddyKit 上的免费 R Academy 课时。这是第 1 节课，共 4 节。你可以在下方免费阅读本课时的完整内容 — 然后在浏览器中使用内置代码编辑器和全天候 AI 导师进行实践。这是 R Academy 学习路径的一部分，你的进度在网页和 CoddyKit 应用中同步。 R Academy 课程共包含 4 节课。

R 条件系统

R 提供了正式的条件系统来传达问题。主要有三种条件类：错误（致命——停止执行）、警告（非致命——代码完成后打印）和消息（提供信息——输出到 stderr）。

# Each condition type behaves differently
message('This is a message')
warning('This is a warning')
# stop() would halt here, so wrap it
tryCatch(stop('This is an error'), error = function(e) print(e))

stop() — 生成错误

stop(msg) 会发出错误条件。执行会立即停止，并显示错误消息。它用于函数内部：当输入无效或检测到无法恢复的情况时中止执行。

divide <- function(x, y) {
  if (y == 0) stop('Division by zero is not allowed')
  x / y
}
tryCatch(divide(10, 0), error = function(e) cat('Error:', conditionMessage(e), '\n'))
divide(10, 2)

warning() — 非致命警告

warning(msg) 会发出警告条件。与错误不同，警告不会停止执行——函数会继续运行，并收集该警告。默认情况下，所有代码执行完毕后才会打印警告；如果设置了 options(warn=1)，则会立即打印。

safe_sqrt <- function(x) {
  if (x < 0) {
    warning('Negative input; returning NaN')
    return(NaN)
  }
  sqrt(x)
}
result <- safe_sqrt(-4)
cat('Result:', result, '\n')

message() — 信息性条件

message(msg) 会发出消息条件。它输出到 stderr，包含自动换行，并且可以使用 suppressMessages() 抑制。请使用它在函数中报告进度，而不要用它表示错误或警告。

load_data <- function(n) {
  message('Loading ', n, ' records...')
  seq_len(n)
}
data <- suppressMessages(load_data(100))
cat('Got', length(data), 'records\n')

simpleError 和 simpleWarning 对象

R 创建条件时，会将消息包装在条件对象中。simpleError('msg') 和 simpleWarning('msg') 可以手动创建条件对象。您可以使用 conditionMessage() 检查这些对象。

e <- simpleError('something went wrong')
w <- simpleWarning('this looks suspicious')
cat('Error class   :', class(e), '\n')
cat('Warning class :', class(w), '\n')
cat('Error message :', conditionMessage(e), '\n')
cat('Warning msg   :', conditionMessage(w), '\n')

conditionMessage() 与 conditionCall()

conditionMessage(cond) 会从任意条件对象中提取文本消息。conditionCall(cond) 会提取触发该条件的调用。两者在错误处理程序中都很有用，可用于记录日志或重新发出条件。

tryCatch(
  log(-1),
  warning = function(w) {
    cat('Caught warning :', conditionMessage(w), '\n')
    cat('From call      :', deparse(conditionCall(w)), '\n')
  }
)

options(warn = 2) — 将警告视为错误

设置 options(warn = 2) 会将所有警告转换为错误，从而立即停止执行。在开发期间，这有助于尽早发现会生成警告的代码。请使用 options(warn = 0) 恢复设置。

old_warn <- options(warn = 0)  # default: collect warnings
log(-1)  # just a warning
options(warn = 0)
tryCatch({
  options(warn = 2)
  log(-1)   # now fatal
}, error = function(e) cat('Caught as error:', conditionMessage(e), '\n'),
finally = options(old_warn))

即时警告与延迟警告

使用 options(warn = 0)（默认值）时，警告会被收集，并在最后打印。使用 options(warn = 1) 时，每个警告会在发生时立即打印。使用 warn = 2 时，警告会变成错误。

# warn=1: print warnings immediately as they happen
old <- options(warn = 1)
result1 <- log(-1)
result2 <- sqrt(-4)
cat('Results:', result1, result2, '\n')
options(old)

错误与警告：致命与非致命

关键区别在于：除非由处理程序捕获，否则错误会完全停止执行；警告会被记录，但执行会继续。这意味着，如果本应使用错误却使用了警告，无效输入可能会悄无声息地产生错误结果。

# With warning: execution continues
f_warn <- function(x) { if (x < 0) warning('negative'); x^2 }
cat('warn result:', f_warn(-3), '\n')  # still computes 9

# With error: execution stops
f_stop <- function(x) { if (x < 0) stop('negative'); x^2 }
tryCatch(f_stop(-3), error = function(e) cat('stopped:', e$message, '\n'))

嵌套条件

条件可以在其他条件处理程序内部引发。警告处理程序可以调用 stop()，将警告升级为错误。这是让第三方代码变得更严格的常见模式。

strict_log <- function(x) {
  withCallingHandlers(
    log(x),
    warning = function(w) {
      stop(paste('Strict mode: warning treated as error:', conditionMessage(w)))
    }
  )
}
tryCatch(strict_log(-1), error = function(e) cat('Error:', e$message, '\n'))
cat('log(4) =', strict_log(4), '\n')

suppressWarnings() 与 suppressMessages()

suppressWarnings(expr) 会计算表达式，同时静默捕获并丢弃所有警告。suppressMessages(expr) 对消息条件执行相同操作。请谨慎使用这些函数——抑制警告可能会隐藏真正的问题。

# Without suppression: warning shown
result1 <- log(-1)
# With suppression: warning hidden
result2 <- suppressWarnings(log(-1))
cat('Both are NaN:', is.nan(result1), is.nan(result2), '\n')

快速检查

关于 warning() 和 stop()，以下哪项说法是正确的？

在交互式课程中回答

条件：要点总结

R 条件的要点：

stop() = 错误 = 致命，会立即停止；warning() = 非致命，执行会继续；message() = 提供信息，输出到 stderr
三者都会创建具有类层次结构的条件对象
conditionMessage(e) 会从任意条件中提取文本
options(warn=1) 会立即打印警告；warn=2 会将警告视为错误
suppressWarnings() / suppressMessages() 会静默条件
对于无效输入，如果继续执行会导致错误，应优先使用 stop()

# Summary of the three condition functions
tryCatch({
  message('Step 1 starting')
  warning('something looks odd')
  stop('cannot continue')
}, message = function(m) cat('MSG:', conditionMessage(m)),
   warning = function(w) cat('WARN:', conditionMessage(w), '\n'),
   error   = function(e) cat('ERR:', conditionMessage(e), '\n'))

免费开始

用 AI 导师学习 R — 免费

在浏览器中编写并运行真实代码，获得全天候 AI 导师的即时帮助，并在网页或应用中继续学习。

课程: 43
课程: 159

免费开始学习查看完整课程

常见问题解答

「R 中的错误、警告与消息」课时是免费的吗？

是的 — 「R 中的错误、警告与消息」的完整文本可在网页上免费阅读。要进行交互式练习（内置代码编辑器和全天候 AI 导师）并解锁 R Academy 课程的其余内容，请升级到 CoddyKit PRO。 R Academy 课程共包含 4 节课。

「R 中的错误、警告与消息」这节课中我会学到什么？

了解三种信号类型，以及每种类型在何时产生你通过在浏览器中直接运行的动手代码来练习 R Academy，全天候 AI 导师会在你学习这节课的过程中回答你的问题。

学习 R Academy 需要有经验吗？

无需任何先前经验。CoddyKit 上的 R Academy 课程适合初学者到高级学习者，你可以从这里开始或从头开始，按照自己的节奏学习。这是第 1 节课，共 4 节。

「R 中的错误、警告与消息」课时需要多长时间？

大多数 CoddyKit 课程大约需要 5–10 分钟。每节课都很精短且互动，所以你能稳步进步，并在网页和应用中从离开的地方继续。

我能在这节 R Academy 课中编写并运行代码吗？

能。每节 R Academy 课都包含内置代码编辑器，你可以在浏览器中直接编写并运行真实代码，并获得即时 AI 反馈 — 无需本地设置。

此课程中的所有课时

← 返回 R Academy