如何将数据框插入到SQL Server表中？

library(RODBC)
con <- odbcDriverConnect("driver=SQL Server; server=database")

df <- data.frame(a=1:10,b=10:1,c=11:20)

values <- paste("(",df$a,",df$b,df$c,")",sep="",collapse=",")

cmd <- paste("insert into MyTable values ",values)

result <- sqlQuery(con,cmd,as.is=TRUE)

这似乎工作,但不能很好地缩放.有更简单的方法吗？

解决方法

values <- paste( " df[,c(",paste( names(df),"),")] ",collapse="" ) 
      values
      #[1] " df[,c( a,b,c )] "

你说你的代码是“工作的”..我也会以为有人会使用sqlSave而不是sqlQuery如果有人想“上传”.

我会猜到这将更有可能做你所描述的：

sqlSave(con,df,tablename = "MyTable")

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!