【发布时间】:2016-07-22 21:14:21
【问题描述】:
我曾经在我的.Rprofile 中有一个dbConnect 声明为.First 和一个dbDisconnect 声明为.Last。我不再需要这些,所以我将它们从.Rprofile 中删除,但由于dbDisconnect 语句,当我退出时R 挂起。我可以通过q(runLast=F) 退出。
> q()
Error in .Last() : could not find function "dbDisconnect"
我在我的根目录中放了一个空的.Rprofile,但我仍然收到此错误。我有默认的Rprofile.site。
这是什么原因造成的?有解决办法吗? FWIW,我在带有 R 3.3.1 的 Windows 8.1 上。
我的.Rprofile 现在是空白的。但它曾经包含following。
library(rJava)
.jinit(parameters="-Xmx8g")
library(RJDBC)
user <- "my_username"
pass <- '{SAS002}DBCC5712369DE1C65B19864C1564FB850F398DCF'
wrdsconnect <- function(user=user, pass=pass){
drv <- JDBC("com.sas.net.sharenet.ShareNetDriver", "/usr/local/sas/jdbc_driver/sas.intrnet.javatools.jar", identifier.quote="`")
wrds <- dbConnect(drv, "jdbc:sharenet://wrds-cloud-h.wharton.private:8551/", user, pass)
return(wrds)
}
.First <- function(){
wrds <<- wrdsconnect(user=user, pass=pass)
}
.Last <- function(){
dbDisconnect(wrds)
}
【问题讨论】:
-
@ZheyuanLi -- 现在是空白,但我可以把旧版本放在问题中。