第一步：创建数据源（方法见下面链接）
http://www.2cto.com/database/201412/365396.html
第二步：在R中输入以下代码：
#####SQL SERVER与R语言互连######
library(RODBC);
dbhandle <- odbcDriverConnect(‘driver={SQL Server};server=(local);database=TESTdatabase;trusted_connection=true‘);#TESTdatabase为数据库
res <- sqlQuery(dbhandle, ‘select * from class ‘);#class为TESTdatabase数据库中表
sqlSave(dbhandle,res,"A",append=FALSE);
odbcClose(dbhandle);
原文：http://www.cnblogs.com/whb-20160329/p/5701049.html