在R使用数据库接口
## 使用数据库接口
# 使用dbConnect
install.packages("RMySQL")
library(RMySQL)
# 数据库配置信息
channel <- dbConnect(MySQL(),
user="xxx", #用户名
password="xxx", #密码
dbname="user_info", #数据库名称
host="xxx") #主机地址
#查看数据库中的所有表
dbListTables(channel)
# 专治中文乱码
dbSendQuery(channel, "SET NAMES gbk")
# 从数据库向R读表
dbReadTable(channel, "bw_user_address_sh") # 尤其是很大的表,不要轻易读
# 试着向数据库
headmt <- head(mtcars)
dbWriteTable(channel, "headmt", headmt) #将R中的数据写入mysql
headmt <- dbReadTable(channel, "headmt") #将数据库中数据读入到R
#查询数据
dbGetQuery(channel, "select * from bw_user_address_sh where area_id=310101 and lat<>-1 AND ((lat<30.8 and lng>102.5) or (lat>31 and lng<120.6))")
# 关闭连接
dbDisconnect(channel)