dbIsValid: ошибка в (функция (классы, fdef, mtable):

Question

Мне нужно проверить соединение между Hive и RStudio.

Так что это моя функция подключения

conn<- function (java.size, user = Sys.info()["user"], password = getPass::getPass(msg = "Hive password")) 
{
    options(java.parameters = paste0("-Xmx", java.size, "g"))
    print(paste("java.parameters :", getOption("java.parameters")))
    cp = c("/hive-jdbc.jar", "/lib/PR/hadoop-common.jar")
    .jinit(classpath = cp)
    drv <- JDBC(".jdbc.HiveDriver", "/hive-jdbc.jar", 
        identifier.quote = "`")
    conn <- DBI::dbConnect(drv, "/default", 
        user, password)
    return(conn)
}

Затем я использовал функцию dbIsValid, чтобы проверить, хорошо ли работает соединение.

dbIsValid(con)

Но я получаю эту ошибку:

Ошибка в (функция (классы, fdef, mtable): невозможно найти унаследованный метод для функции «dbIsValid» для подписи «JDBCConnection"»

Как я могу решить это, пожалуйста?