• R语言—连接Oracle数据库


    本教程会讲解两种方法,第一种方法较为简单,且中文不容易出现乱码。第二种方法,较为复杂,和java的jdbc连接数据库操作类似。

    操作环境:

        • 系统:windows10 64位
        • 数据库:Oracle11g  用户名:testuser  
        • 案例用表:emp
        • R语言版本:3.4.0  64位
        • RStudio版本:1.0.143

    方法一(推荐):

    1.设置"ODBC数据源(64位)"

    图1:控制面板>管理工具>ODBC数据源(64位)

    图2:有些设置,自己要记得,红字中的代码会用到。

     

    2.代码部分

    > library(RODBC)  ##加载RODBC包,没有成功的请先下载安装install.packages("RODBC")
    > con<-odbcConnect("oracle",uid="testuser",pwd="testuser",believeNRows=FALSE) ##建立Oracle连接
    > emp1<-sqlQuery(con,"select * from EMP") ##sqlQuery可带查询语句
    > sqlFetch(con,'EMP')  ##sqlFetch可根据表名,获取Oracle中的表(注意,这里表名在单引号中,双引号会报错) 
    > odbcClose(con) ##关闭连接 EMPNO ENAME JOB MGR HIREDATE SAL COMM DEPTNO
    1 7369 SMITH CLERK 7902 1980-12-17 800 NA 20 2 7499 ALLEN SALESMAN 7698 1981-02-20 1600 300 30 3 7521 WARD SALESMAN 7698 1981-02-22 1250 500 30
    ····

    方法一结束!!!

    方法二:

    1.将驱动"ojdbc6_g.jar"放到R的工作空间中,不知道R工作空间的可以通过在RStudio中输入"getwd()"查看路径。

    图3:"ojdbc6_g.jar"文件在Oracle11g的目录中能找到,无需下载

    2.代码部分

    > library(RJDBC)  ##加载"RJDBC"包,如果失败了。请安装该包install.packages("RJDBC")
    > drv<-JDBC("oracle.jdbc.driver.OracleDriver","ojdbc6_g.jar", identifier.quote=""")  ##java中JDBC的套路
    > conn<-dbConnect(drv,"jdbc:oracle:thin:@127.0.0.1:1521:orcl","testuser","testuser") ##建立一个连接
    > EMP<-dbReadTable(conn,'EMP') ##根据连接和表名获取Oracle中的表
    > table1<-dbGetQuery(conn,"select * from EMP")  ##根据sql记录获取Oracle中表的数据
    > head(EMP,3)  ##查看前三行
      EMPNO ENAME      JOB  MGR            HIREDATE  SAL COMM DEPTNO
    1  7369 SMITH    CLERK 7902 1980-12-17 00:00:00  800   NA     20
    2  7499 ALLEN SALESMAN 7698 1981-02-20 00:00:00 1600  300     30
    3  7521  WARD SALESMAN 7698 1981-02-22 00:00:00 1250  500     30
    > head(table1,3) ##查看前三行
      EMPNO ENAME      JOB  MGR            HIREDATE  SAL COMM DEPTNO
    1  7369 SMITH    CLERK 7902 1980-12-17 00:00:00  800   NA     20
    2  7499 ALLEN SALESMAN 7698 1981-02-20 00:00:00 1600  300     30
    3  7521  WARD SALESMAN 7698 1981-02-22 00:00:00 1250  500     30
    > names(table1)=iconv(names(table1),"UTF-8","GBK")  ##若是表中列名为中文,读取时出现乱码,可用这句来搞定乱码情况

    方法二结束!!!

  • 相关阅读:
    Linux HugePages及MySQL 大页配置
    tcp短连接TIME_WAIT问题解决方法大全
    从问题看本质: 研究TCP close_wait的内幕
    tcp_tw_recycle和tcp_timestamps的文章汇总
    MYSQL博客
    Tcp_tw_reuse、tcp_tw_recycle 使用场景及注意事项
    net.ipv4.tcp_tw_recycle
    TIME-WAIT和CLOSE-WAIT
    mysql 源码调试方法
    mysqldump 备份原理9
  • 原文地址:https://www.cnblogs.com/dsjxmz/p/6896641.html
Copyright © 2020-2023  润新知