RMySQL

链接数据库

con <- dbConnect(MySQL(),host='10.000.000.57',username='MY_USERNAME',password='MYPASSWORD',port=3306,dbname='数据库名')

对数据库指定字段插入数据

for (i in 1:nrow(merge_results)){
dbSendQuery(con,paste0("insert into table (name,age,moneyr) values ('",merge_results$NAME[i],"','",merge_results$AGE[i],"','",merge_results$MONEY[i],"')"))}
dbDisconnect(con)