# \donttest{
data <- data.frame(temp = 1)
if (!("tmean" %in% colnames(data))) {
err <- tryCatch(
abort_column_not_found("tmean", colnames(data)),
error = identity
)
err$suggestion
}
# }
Run the code above in your browser using DataLab