0

我有很多data.frames()我试图通过RMySQL().

# Sends data frame to database without a problem
dbWriteTable(con3, name="SPY", value=SPY , append=T)

# stock1 contains a character vector of stock names...
stock1 <- c("SPY.A") 

但是当我尝试循环它时:

i= 1
while(i <= length(stock1)){
# converts "SPY.A" into SPY 
name <- print(paste0(str_sub(stock1, start = 1, end = -3))[i], quote=F) 
# sends data.frame to database
dbWriteTable(con3,paste0(str_sub(stock1, start = 1, end = -3))[i], value=name, append=T)
i <- 1+i
}

返回以下警告并且没有任何内容发送到数据库

In addition: Warning message:
In file(fn, open = "r") :
cannot open file './SPY': No such file or directory

但是,我认为问题出在粘贴valuedbWriteTable()自写dbWriteTable(con3, "SPY", SPY, append=T)作品以来,但dbWriteTable(con3, "SPY", name, append=T)不会...

4

1 回答 1

1

您可能正在使用非基础包,str_sub我猜您使用substr. 这成功了吗?

dbWriteTable(con3,  substr( stock1, 1,3) , get(stock1),  append=T)
于 2014-07-17T00:19:02.980 回答