r 64位连接mysql_R语言使用RMySQL连接及读写Mysql数据库 测试通过

print?

library(RMySQL)

help(package=”RMySQL”) #查看RMySQL的说明文档，里面有RMySQL所有可用的方法

#创建数据库连接

con 

#获取连接信息，查看database下所有表，以及删除testname表

summary(con)

dbGetInfo(con)

dbListTables(con)

dbRemoveTable(con,"test")

[plain] view plaincopy

print?

#写数据库表

fruits 

dbListTables(con)

dbWriteTable(con,"fruits",fruits)

dbListTables(con)

[plain] view plaincopy

print?

#读数据库

dbReadTable(con,"fruits")#中文出现乱码，这是因为字符编码格式不统一的问题

dbSendQuery(con,‘SET NAMES utf8‘)    #修正，原为：dbSendQuery(con,‘SET NAMES uft8‘)

dbReadTable(con,"fruits")#没有乱码问题了

dbSendQuery(con,‘SET NAMES uft8‘)这个设置一老会提示错误，可能会需要多试几次才行，不知道为什么。

注意：应为：dbSendQuery(con,‘SET NAMES utf8‘)

[plain] view plaincopy

print?

#写数据表，覆盖追加

testA 

testB 

#直接写testA写入test表中

dbWriteTable(con,"test",testA,row.names=F)

dbReadTable(con,"test")

#追加写testB追加在test表后

dbWriteTable(con,"test",testB,append=T,row.names=F)

dbReadTable(con,"test")

#覆盖写testB覆盖test表

dbWriteTable(con,"test",testB,overwrite=T,row.names=F)

dbReadTable(con,"test")

[plain] view plaincopy

print?

#用SQL语句查询dbGetQuery()和dbSendQuery()两种方法

dbGetQuery(con, "SELECT * FROM fruits limit 3")

res 

data 

data

data 

data

dbClearResult(res)

dbDisconnect(con) #断开连接

[plain] view plaincopy

print?

#用SQL语句批量查询

con 

dbSendQuery(con,‘SET NAMES uft-8‘)

sql 

res1 

dbFetch(res1, n = -1)

if (dbMoreResults(con)) {

res2 

dbFetch(res2, n = -1)

}

dbListResults(con)

dbClearResult(res1)

dbClearResult(res2)

dbDisconnect(con)

参考：RMySQL数据库编程指南

R语言使用RMySQL连接及读写Mysql数据库 测试通过

标签：inno   tool   www   strong   row   _for   select   app   派生

本条技术文章来源于互联网，如果无意侵犯您的权益请点击此处反馈版权投诉

本文系统来源：http://www.cnblogs.com/awishfullyway/p/6655680.html