1、Rserve安装和启动(windows环境)
前提:安装并配置了R语言。
步骤:a.打开R工具,在命令中执行install.packages("Rserve"),下载Rserve;
下载完成后,R-x.x.x\library下会出现Rserve文件夹。
b.输入library(Rserve)和Rserve()命令手动启动Rserve服务。
2、Java调用R
前置操作:导入Rengine.jar和Rserve.jar,如web项目,直接把这两个jar包复制黏贴到web项目的WEB-INF\lib目录下。
(这两个jar包在R-x.x.x\library\Rserve\java目录下可以找到,或者网上下载)
基本方法:
Rconnection:
eval():执行R语句
assgin():声明变量
REXP:
asInteger() , asIntegers() , asString() , asDouble() , asDoubles() , asList()等等:返回相应类型的数据
例子: (前提:已经手动或者用代码启动了Rserve服务)
1. 调用R语言函数
RConnection rc = new Rconnection(); //建立连接
int[] a = {5141578,4955750,5395375,5583967,5763663,5981998,6447677,6668438};
rc.assign("data", a); //声明变量,相当于在R命令行中输入data<-a命令
REXP x = rc.eval("max(data)"); //执行R语句,相当于在R命令行中输max(data)命令
System.out.println(x.asInteger());//REXP. asXxx()返回相应类型的数据,如果结果类型不符会出错
2、调用R脚本的函数
假设有一个自己写好test.R,里面有一个函数如下:
myFunc<-function(data){
x<-data+2;
}
----------------------分割线------------------------------
调用如下:
RConnection rc = new Rconnection();
String fileName="E:\\Rscript\\test.R"; // test.R的路径rc.assign("fileName", fileName); //声明变量
rc.eval("source(fileName)"); //执行test.R脚本,执行这一步才能调用里面的自定义函数myFunc,如果不行,就在R工具上也执行一下test.R脚本
String num = "2";
rc.assign("param",num);
REXP rexp = rc.eval("myFunc(param)"); //不行就用rc.eval("myFunc("+num+")");
System.out.println(rexp.asInteger()); //返回类型是一个整数类型,所以用asInteger
参考:
在R-x.x.x\library\Rserve\client\java\Rserve\test目录下有测试用例,可以参考。(StartRserve.java是用java启动Rserve服务,而不用打开R语言来手动启动。test.java里包含了基本方法的调试)
Ps:如果输入参数类型是数据框,矩阵,List等等特殊类型,可参照上面提及的test.java里面的方法,关于List取值里面也有。
如果需要代码启动Rserve服务,可以在RConnection rc = new Rconnection();
前面加上System.out.println(StartRserve.checkLocalRserve());
如果成功启动,在console上会输出如下信息:
Rserve is running.
true
如果不成功,请确认安装了R语言,下载了Rserve并导入了jar包。
关闭Rserve服务用rc.close();
说明:此文章为个人心得,主要为了记录,方便自己看,如果出错或者有更好的方法,欢迎指出讨论。