我想知道如何检查html是否可用。如果不是，我想控制返回以避免错误地停止脚本。 例如：
arq <- readLines("www.pageerror.com.br")
print(arq)
答案 0 :(得分：5)
替代方案是try() - 使用trycatch()比使用URL <- "http://www.pageerror.com.br"
arq <- try(suppressWarnings(readLines(con <- url(URL))), silent = TRUE)
close(con) ## close the connection
if(inherits(arq, "try-error")) {
writeLines(strwrap(paste("Page", URL, "is not available")))
} else {
print(arq)
}
更简单，但不是很有用。您可能还需要禁止警告，因为R将报告无法解析地址。
在剧本中你想要这样的东西：
silent = TRUE FALSE位禁止报告错误（如果将其保留为默认值try(...., silent = TRUE)，则R将报告错误但不会中止脚本）。我们在suppressWarnings()中包含潜在的错误提升函数调用，其中arq用于抑制警告。然后我们测试返回的对象"try-error"的类，如果它继承自类arq，我们知道无法检索页面并发出指示这样的消息。否则我们可以打印{{1}}。
答案 1 :(得分：0)
?tryCatch'努夫说。 ＆lt; - 除了，显然不是，因为页面编辑器在答案中需要更多字符。所以，“如果一只鸡半只在一天半的时间内产下一个半个鸡蛋，九天内就有九只鸡会产下多少个鸡蛋？”
好的，够久了。