R通过RJDBC连接外部数据库

9 篇文章 0 订阅

1、  连接hive

library(RJDBC)

drv<-JDBC(“org.apache.hive.jdbc.HiveDriver”,list.files(“/home/hadoop/impala-jdbc-0.5.2”,pattern=”jar$”,full.names=TRUE,recursive=TRUE))

conn<-dbConnect(drv,sprint(‘jdbc:hive2://%s:%s/default’,'xxx.xxx.xxx.xxx’,'xxxxx’))#注释:后面两个分别为IP和端口

2、  连接mysql

library(RJDBC)

drv<-JDBC(“com.mysql.jdbc.Driver”,”/etc/jdbc/mysql-connector-java-3.1.14-bin.jar”,identifier.quote="`")

conn<-dbConnect(drv,”jdbc:mysql://localhost/test”,"user”,"pwd”)

3、  连接sasspds

library(RJDBC)

drv<-JDBC("com.sas.rio.MVADriver",c("C:/sasjdbc/sas.core.jar","C:/sasjdbc/sas.oma.joma.jar","C:/sasjdbc/sas.oma.joma.rmt.jar","C:/sasjdbc/sas.oma.omi.jar","C:/sasjdbc/sas.security.sspi.jar","C:/sasjdbc/sas.svc.connection.jar"),identifier.quote="\"")

 

conn <- dbConnect(drv, "jdbc:sasiom://127.0.0.1:8580", "sasdemo", "q123","'SASSPDS'  'demoschema' USER='demo' PASSWORD='{sas001}ZM0'  Serv='50000'  HOST='127.0.0.1")

 

dbSendUpdate(conn,"LIBNAME DEMO SASSPDS schema='demoschema' USER='demo' PASSWORD='{sas001}ZM0' HOST='127.0.0.1' Serv='5000'")   #注释:dbSendUpdate可以执行所有的sql语句,包括建表、查询、增删改等。

 

dbGetQuery(conn,"select * from DEMO.TEST WHERE DATE_CODE= '201211'")  #注释:dbGetQuery()函数只能执行select语句

 

d<-dbReadTable(conn,"DEMO.TEST")#查看表的内容

dbDisconnect(conn)#关闭连接

4、  连接oracle

library(RJDBC)

drv<-JDBC("oracle.jdbc.driver.OracleDriver","E:/oracle/jdbc/lib/ojdbc14.jar", identifier.quote="\"")    #注释:identifier.quote用来作写入数据库中表的列名的分隔符,与names(数据框)中显示的相一致

conn <- dbConnect(drv, "jdbc:oracle:thin:@127.0.0.1:1521:demo","demo","demo")

data(iris)
dbWriteTable(conn, "iris", iris, overwrite=TRUE)

 

5、  连接DB2

library(RJDBC)

drv<-JDBC("com.ibm.db2.jcc.DB2Driver","E:/IBM/SQLLIB/java/db2jcc.jar",identifier.quote="\"")

conn <- dbConnect(drv, "jdbc:db2://127.0.0.1:1521/demo","test","test")

data(iris)
dbWriteTable(conn, "iris", iris, overwrite=TRUE)

 

RJDBC常用函数

1、  JDBC(驱动,jar,分隔符):加载数据库驱动

2、  dbConnect(驱动参数,url,用户名,密码,其他):连接数据库

3、  dbListTables(conn):显示连接中的所有表

4、  dbWriteTable(conn, "iris", iris, overwrite=TRUE):将数据框iris写入表iris中,overwrite覆盖原表

append=TRUE追加,dbWriteTable(conn, "IRIS", d, overwrite=FALSE,append=TRUE)且d要与表iris的结构一致。)

5、  dbGetQuery(conn, "select count(*) from iris"):查询语句

6、  dbSendUpdate(conn,”sql语句”):执行任何非查询sql语句

7、  dbReadTable(conn, "iris"):读取表中数据

8、  dbDisconnect(conn):关闭连接

9、  dbExistsTable(conn,”iris”):是否存在表iris

10、  dbRemoveTable(conn,”iris”):删除表iris

 

评论 5
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值