我有以下基本代码:
library(dplyr)
my_db <- src_sqlite("my_db.sqlite3", create = T)
tbl(my_db, sql("SELECT * FROM flights"))
此代码创建一个SQLite数据库并选择一个不存在的表。这将返回一条消息:“rsqlite_send_query中的错误(conn @ ptr,statement):no such table:flights”。
出于某种原因,我无法抑制此输出。我试过了:
# suppressMessages
suppressMessages(tbl(my_db, sql("SELECT * FROM flights")))
# suppressWarnings
suppressWarnings(tbl(my_db, sql("SELECT * FROM flights")))
# use invisible
invisible(tbl(my_db, sql("SELECT * FROM flights")))
# use sink
sink(tempfile())
tbl(my_db, sql("SELECT * FROM flights"))
sink()
# via tryCatch
tryCatch({
tbl(my_db, sql("SELECT * FROM flights"))
})
有没有其他方法可以删除在这种情况下有用的输出?