函数中库调用的正确约定

时间:2016-08-24 21:02:58

标签: r function

我最近自己写了一个易于使用的软件包,可以在我的工作中使用。该软件包中的一个功能是在cronjob上实现的。我发现这些功能运行良好,但由于库消息,我在mutt上的服务器上收到了大量内部邮件。处理这些消息以便它们被抑制的正确约定是什么?

目前,DB调用函数可能如下所示:

Get_Ids <- function(from = Sys.Date(), to = Sys.Date()){
    if(!require(RMySQL))
    {
    install.packages("RMySQL")
    suppressMessages(library(RMySQL))
    }

    db.con <- tryCatch({dbConnect(MySQL(), host= "localhost", dbname = "ID_db")}, 
                    error = function(e) {1})

    if(class(db.con) == "MySQLConnection")
    {                   
    Query <- paste0("Select * from ID_tbl where Date between '", from,"' AND '", to," 23:59:59';")

    Ids <- tryCatch({dbGetQuery(db.con, Query)}, error = function(e) {1})

    dbDisconnect(db.con)
    return(Ids)
    }else
    {
        return("Error occured")
    }
 }

但是一旦我跑了

 Get_Ids() 

我在控制台上获得以下消息

Loading required package: RMySQL

0 个答案:

没有答案