Linux_R语言通过RDameng连接DM8

飞奔的屎壳郎2023-07-20 22:13

一、下载安装软件anaconda

python需要下载很多包，Anaconda集成了几乎常用的包，如果你需要的包要求不同版本的Python，你无需切换到不同的环境，因为conda同样是一个环境管理器。仅需要几条命令，你可以创建一个完全独立的环境来运行不同的Python版本，同时继续在你常规的环境中使用你常用的Python版本。
主要就是R语言依赖的包热别多，anaconda可以一键安装。

anaconda官网下载地址：https://mirrors.tuna.tsinghua.edu.cn/anaconda/archive/

输入yes 并且 输入目录

shell 复制代码 
[root@localhost ~]# cd /opt/
[root@localhost opt]# mkdir dm_soft
[root@localhost opt]# cd dm_soft/
[root@localhost dm_soft]# ls
Anaconda3-2023.03-1-Linux-x86_64.sh
[root@localhost dm_soft]# chmod 755 Anaconda3-2023.03-1-Linux-x86_64.sh 
[root@localhost dm_soft]# ./Anaconda3-2023.03-1-Linux-x86_64.sh 

Welcome to Anaconda3 2023.03-1

In order to continue the installation process, please review the license
agreement.
Please, press ENTER to continue
>>> 回车
Please answer 'yes' or 'no':
>>> yes

Anaconda3 will now be installed into this location:
/root/anaconda3

  - Press ENTER to confirm the location
  - Press CTRL-C to abort the installation
  - Or specify a different location below

## 安装目录
[/root/anaconda3] >>> /opt/anaconda3
## 是否初始化终端
Do you wish the installer to initialize Anaconda3
by running conda init? [yes|no]
[no] >>> yes
Do you wish the installer to initialize Anaconda3
by running conda init? [yes|no]
[no] >>> yes

no change     /opt/anaconda3/condabin/conda
no change     /opt/anaconda3/bin/conda
no change     /opt/anaconda3/bin/conda-env
no change     /opt/anaconda3/bin/activate
no change     /opt/anaconda3/bin/deactivate
no change     /opt/anaconda3/etc/profile.d/conda.sh
no change     /opt/anaconda3/etc/fish/conf.d/conda.fish
no change     /opt/anaconda3/shell/condabin/Conda.psm1
no change     /opt/anaconda3/shell/condabin/conda-hook.ps1
no change     /opt/anaconda3/lib/python3.10/site-packages/xontrib/conda.xsh
no change     /opt/anaconda3/etc/profile.d/conda.csh
modified      /root/.bashrc

==> For changes to take effect, close and re-open your current shell. <==

If you'd prefer that conda's base environment not be activated on startup, 
   set the auto_activate_base parameter to false: 

conda config --set auto_activate_base false

##拷贝
[root@localhost bin]# cp /opt/anaconda3/bin/conda /usr/bin/

二、替换数据源

shell 复制代码 
[root@localhost bin]# conda config --add channels https://mirrors.tuna.tsinghua.edu.cn/anaconda/cloud/conda-forge/
[root@localhost bin]# conda config --add channels https://mirrors.tuna.tsinghua.edu.cn/anaconda/pkgs/free/
[root@localhost bin]# conda config --add channels https://mirrors.tuna.tsinghua.edu.cn/anaconda/pkgs/main/
[root@localhost bin]# conda config --append channels https://mirrors.tuna.tsinghua.edu.cn/anaconda/cloud/fastai/
[root@localhost bin]# conda config --append channels https://mirrors.tuna.tsinghua.edu.cn/anaconda/cloud/pytorch/
[root@localhost bin]# conda config --append channels https://mirrors.tuna.tsinghua.edu.cn/anaconda/cloud/bioconda/
# 上面的命令拷贝下来 方便批量运行
conda config --add channels https://mirrors.tuna.tsinghua.edu.cn/anaconda/cloud/conda-forge/
conda config --add channels https://mirrors.tuna.tsinghua.edu.cn/anaconda/pkgs/free/
conda config --add channels https://mirrors.tuna.tsinghua.edu.cn/anaconda/pkgs/main/
conda config --append channels https://mirrors.tuna.tsinghua.edu.cn/anaconda/cloud/fastai/
conda config --append channels https://mirrors.tuna.tsinghua.edu.cn/anaconda/cloud/pytorch/
conda config --append channels https://mirrors.tuna.tsinghua.edu.cn/anaconda/cloud/bioconda/
# 搜索时显示通道地址
[root@localhost bin]# conda config --set show_channel_urls yes
# 最后，执行conda info
[root@localhost bin]# conda info

三、创建容器并激活

shell 复制代码 
## 1. 创建环境
[root@localhost bin]# conda create -n dm_test python=3.8

## 2.首次激活 conda 虚拟环境，可用 source activate 激活（如下），
[root@localhost bin]# source activate dm_test
## 3. 退出conda
(dm_test) [root@localhost bin]# conda deactivate
## 4. 激活
[root@localhost bin]# conda activate dm_test
(dm_test) [root@localhost bin]#

四、安装R语言

shell 复制代码 
## 1. 安装R语言
[root@localhost opt]# conda install r-base=3.6.1
## 2. 查看R语言版本
[root@localhost opt]# R --version
R version 3.6.1 (2016-06-21) -- "Bug in Your Hair"                                                                                                                                         
Copyright (C) 2016 The R Foundation for Statistical Computing                                                                                                                              
Platform: x86_64-pc-linux-gnu (64-bit)                                                                                                                                                     
                                                                                                                                                                                           
R is free software and comes with ABSOLUTELY NO WARRANTY.                                                                                                                                  
You are welcome to redistribute it under the terms of the                                                                                                                                  
GNU General Public License versions 2 or 3.                                                                                                                                                
For more information about these matters see                                                                                                                                               
http://www.gnu.org/licenses/.

五、安装DBI

DBI 是 R 语言中关系数据库的底层接口包，RDameng 包的正常使用需要先安装 DBI。 以 DBI_1.0.0 为例，R 安装完毕后，上传 DBI_1.0.0.tar.gz 至/opt/dmsoft 目录下，使用如下命令安装 DBI 工具包。

也可以从以下链接下载 DBI 1.0.0 版本的源码包：
https://cran.r-project.org/src/contrib/Archive/DBI/DBI_1.0.0.tar.gz

这个链接会下载一个名为 DBI_1.0.0.tar.gz 的压缩文件，您可以使用该文件进行手动安装。

shell 复制代码 
## 安装1.0.0安装包
> install.packages("/opt/dmsoft/DBI_1.0.0.tar.gz", repos = NULL, type="source")
* installing *source* package 'DBI' ...
** package 'DBI' successfully unpacked and MD5 sums checked
** R
** inst
** preparing package for lazy loading
** help
*** installing help indices
** building package indices
** installing vignettes
** testing if installed package can be loaded
* DONE (DBI)
## 加载目录不报错就说明加载成功
> library(DBI)



#想要安装的 DBI 1.0.0 版本确实存在于 CRAN 存储库中。
#可以通过以下命令来检查安装 DBI 版本的可用性：
#remove.packages("DBI")

六、编译安装RDameng

  • 使用的数据库必须是DM8 1.3.47及以后的版本才支持。

  • 用户在安装 RDameng 之前需要检查或修改操作系统的配置，以保证 RDameng 正确安装和运行，RDameng 目前仅支持 Linux x86 系统。

  • DMDCI提供的第三方库及头文件分别保存在RDameng_1.1.tar.gz解压后的RDameng/dci_libs目录和RDameng/dci_inc目录下，可选安装RDameng包前复制至指定位置。以复制第三方库及头文件至指定位置为例，上传RDameng_1.1.tar.gz至/opt/package目录下，解压RDameng_1.0.tar.gz获取第三方库。

shell 复制代码 
## R语言版本上传解压
(base) [root@localhost dmsoft]# tar -xzf  RDameng_1.1.tar.gz

## 配置环境变量
(base) [root@localhost dmsoft]# vi /etc/profile
(base) [root@localhost dmsoft]# export LD_LIBRARY_PATH=/opt/dmsoft/RDameng/dci_libs
(base) [root@localhost dmsoft]# source /etc/profile

## 安装R语言
(dm_test) [root@localhost ~]# R CMD INSTALL --configure-args=' --with-dci-lib=/opt/dmsoft/RDameng/dci_libs --with-dci-inc=/opt/dmsoft/RDameng/dci_inc' /opt/dmsoft/RDameng_1.1.tar.gz

遇到了如下报错：

/usr/bin/ld: cannot find -lgfortran

shell 复制代码 
yum install gcc-gfortran

七、运行测试用例

在R语言的服务器上/etc/dm_svc.conf 添加文件 新建dm_svc.conf 把FNUM2CHAR_MODE=(1)参数加上

shell 复制代码 
[root@localhost R]# cat /etc/dm_svc.conf 
TIME_ZONE=(480)
LANGUAGE=(cn)
FNUM2CHAR_MODE=(1)
sql 复制代码 
drop table TEST;
CREATE TABLE TEST(C1 VARCHAR2(50 CHAR));
insert into "SYSDBA"."TEST"("C1")  VALUES(1/3);
select length(C1)from TEST;
SP_SET_PARA_VALUE(1,'CALC_AS_DECIMAL',3);
r 复制代码 
library(DBI)
library(RDameng)

#数据库地址地址
dbHost <- "192.168.145.190"
#数据库名称
dbServerName <- "DmServiceDMSERVER"
#用户名
dbUserName <- "SYSDBA"
#密码
dbPassword <- "SYSDBA"

#初始化driver
drv <- dbDriver("Dm")
#拼写TNS字符串
connect.string <- paste("(DESCRIPTION=(ADDRESS=(PROTOCOL=tcp)(HOST=", dbHost, ")(PORT= 5236))(CONNECT_DATA=(SERVICE_NAME=", dbServerName, ")))", sep = "")
#连接数据库
oracleCon <- dbConnect(drv,username = dbUserName, password = dbPassword,dbname = connect.string) 
#查看连接信息
#dbGetInfo(oracleCon)
#查看驱动详细信息
#dbGetInfo(drv)

#插入数据
thisnum <- 1/3
print(thisnum)
dataFrame <-data.frame(c1=thisnum)
dbWriteTable(oracleCon,"TEST",dataFrame,append=T,row.names=F)

#执行查询sql
result <- dbGetQuery(oracleCon, "SELECT LENGTH(C1) FROM TEST")
print(result)

#执行查询sql
c1_result <- dbGetQuery(oracleCon, "SELECT C1 FROM TEST")
print(c1_result)

db_version_str <- dbGetQuery(oracleCon, "SELECT BUILD_VERSION FROM v$instance")
print(db_version_str)

result <- dbGetQuery(oracleCon, "select SF_GET_PARA_VALUE(2,'DECIMAL_ENHANCED')")
print(format(result, scientific=FALSE))

测试图

资料包

链接：https://pan.baidu.com/s/1XRzdN3u2GUhNlK5qFaNKwg?pwd=lr3a

提取码：lr3a

相关推荐
Ven%3 分钟前
centos查看硬盘资源使用情况命令大全
linux·运维·centos
萨格拉斯救世主1 小时前
戴尔R930服务器增加 Intel X710-DA2双万兆光口含模块
运维·服务器
Jtti1 小时前
Windows系统服务器怎么设置远程连接？详细步骤
运维·服务器·windows
TeYiToKu1 小时前
笔记整理—linux驱动开发部分（9）framebuffer驱动框架
linux·c语言·arm开发·驱动开发·笔记·嵌入式硬件·arm
dsywws1 小时前
Linux学习笔记之时间日期和查找和解压缩指令
linux·笔记·学习
yeyuningzi1 小时前
Debian 12环境里部署nginx步骤记录
linux·运维·服务器
上辈子杀猪这辈子学IT1 小时前
【Zookeeper集群搭建】安装zookeeper、zookeeper集群配置、zookeeper启动与关闭、zookeeper的shell命令操作
linux·hadoop·zookeeper·centos·debian
minihuabei1 小时前
linux centos 安装redis
linux·redis·centos
EasyCVR2 小时前
萤石设备视频接入平台EasyCVR多品牌摄像机视频平台海康ehome平台（ISUP）接入EasyCVR不在线如何排查？
运维·服务器·网络·人工智能·ffmpeg·音视频
lldhsds2 小时前
书生大模型实战营第四期-入门岛-1. Linux前置基础
linux
热门推荐
01【HarmonyOS】HUAWEI DevEco Studio 下载地址汇总02(欧拉)openEuler系统添加网卡文件配置流程、(欧拉)openEuler系统手动配置ipv6地址流程、(欧拉)openEuler系统网络管理说明03组基轨迹建模 GBTM的介绍与实现（Stata 或 R）04【AIGC】重塑未来的科技巨轮05全面解析：构建基于深度学习的安全帽检测系统（UI界面+YOLO代码+数据集）06【经验分享】Ubuntu22.04安装微信(linux官方版)07基于YOLOv10深度学习的CT扫描图像肾结石智能检测系统【python源码+Pyqt5界面+数据集+训练代码】深度学习实战、目标检测08Ubuntu 20.04使用Livox mid 360 测试 FAST_LIO09RAG 实践- Ollama+RagFlow 部署本地知识库10红米手机使用google play