C#通过R.Net调用R程序

最新推荐文章于 2024-08-01 17:05:58 发布
最新推荐文章于 2024-08-01 17:05:58 发布
阅读量591 收藏 1
点赞数
文章标签： c# r语言 php
原文链接：http://www.cnblogs.com/smilejian/p/4750235.html
版权

R是一种面向统计学的开源编程语言和软件环境，它由语言，以及带调试器、绘图、系统函数访问和脚本的运行时环境组成。如果想在C#程序中调用R语言执行一些统计分析的功能，得到结果为自己使用，我们可以使用R.Net或者R(D)COM，在这里我只介绍R.Net。R.Net是连接R和..NET Framework的桥梁，要使用R.Net需要.NET Framework 4和R安装环境下的native R DLLs（也就是说你需要安装R程序），R.Net可以在Windows, Linux 和MacOS下运行。

一、开发环境设置

（1）VS环境必须是.NET Framework 4及以上版本才可以

（2）安装R软件，R软件会有x64和x86两个版本，在你的项目中会设置开发平台。如果你的vs项目设置的是x86，使用R.Net只能调用x86的程序；如果你的vs项目设置的是x64，使用R.Net只能调用x64的程序。否则会报错。代码中会详细介绍。

 

（3）在项目中添加R.Net引用

可以参考官网怎么添加引用http://rdotnet.codeplex.com/documentation

       

二、C#调用R.Net代码

（1）获取R程序路径

private void LoadRPath(string RVersion = "R-3.2.1")//默认R-3.2.1

{

    string dlldir = @"C:\Program Files\R\" + RVersion + @"\bin\x64";//默认64位

    bool r_located = false;

    var rPath = System.Environment.Is64BitProcess ?

    string.Format(@"C:\Program Files\R\" + RVersion + @"\bin\x64") :

    tring.Format(@"C:\Program Files\R\" + RVersion + @"\bin\i386");

    dlldir = rPath;

    while (r_located == false)

    {

       try

       {

           REngine.SetEnvironmentVariables(dlldir);

           r_located = true;

       }

       catch

       {

           if (System.Environment.Is64BitProcess)

           {

              MessageBox.Show(@"找不到R运行环境：\R\" + RVersion + @"\bin\x64 " + " \n请手动添加文件夹目录");

            }

            else

            {

               MessageBox.Show(@"找不到R运行环境：\R\" + RVersion + @"\bin\i386" + " \n请手动添加文件夹目录");

            }

            FolderBrowserDialog folderBrowserDialog1 = new FolderBrowserDialog();

            if (folderBrowserDialog1.ShowDialog() == DialogResult.OK)

            {

                 dlldir = @folderBrowserDialog1.SelectedPath;

            }

       }

   }

}

这里需要判断R使用的是x86还是x64版本，因为R.Net依赖你的项目平台是x86还是x64。

 

（2）调用R.Net具体代码

使用R.Net执行R语言其实就engine.Evaluate()里面执行R语句，如：

engine.Evaluate("dataset<-read.table(file.choose(),header=TRUE, sep = ',')");

可以将其结果转换为对应于R.Net或者.Net的数据结构。

a.读取文件表格数据

    

private void button1_Click(object sender, EventArgs e)

{

   dataGridView1.DataSource = null;

   dataGridView1.Refresh();

   try

   {

      engine.Evaluate("dataset<-read.table(file.choose(),header=TRUE, sep = ',')");

      DataFrame dataset = engine.Evaluate("dataset").AsDataFrame();

      engine.SetSymbol("dataset", dataset);

      for (int i = 0; i < dataset.ColumnCount; ++i)

      {

          dataGridView1.ColumnCount++;

          dataGridView1.Columns[i].Name = dataset.ColumnNames[i];

      }

      for (int i = 0; i < dataset.RowCount; ++i)

      {

          dataGridView1.RowCount++;

          dataGridView1.Rows[i].HeaderCell.Value = dataset.RowNames[i];

 

          for (int k = 0; k < dataset.ColumnCount; ++k)

          {

             dataGridView1[k, i].Value = dataset[i, k];

          }

      }

  }

  catch

  {

      MessageBox.Show(@"Equation error.");

  }

}

b、绘制直方图

 private void button2_Click(object sender, EventArgs e)

 {

      var x = engine.Evaluate("x <- rnorm(100, mean=50, sd=10)").AsNumeric();

      engine.Evaluate("hist(x)");

 }

     

c、绘制三维图

 private void button4_Click(object sender, EventArgs e)

 {

    var x = engine.Evaluate("x <- 1:100").AsNumeric();

    var y = engine.Evaluate("y <- 5:105").AsNumeric();

    engine.Evaluate("model = function                                                                                     (a,b){23.86+5.525*b-2.5725*a-6.6413*b^2-5.1862*a^2}"); //evaluate function

    engine.Evaluate("z = outer(x, y ,model)");

    engine.Evaluate("persp(x,y,z)");

 }

          

d、绘制等值线图

 private void button5_Click(object sender, EventArgs e)

 {

    var x = engine.Evaluate("x <- 1:100").AsNumeric();

    var y = engine.Evaluate("y <- 5:105").AsNumeric();

    engine.Evaluate("model = function (a,    b){23.86+5.525*b-2.5725*a-6.6413*b^2-5.1862*a^2}"); //evaluate function

    engine.Evaluate("z = outer(x, y ,model)");

    engine.Evaluate("contour(x,y,z, nlevels = 10)");    

 }

         

e、绘制直线图

 

 

 private void button7_Click(object sender, EventArgs e)

 {

      if (engine.IsRunning == false)

      {

           engine.Initialize();

      }

      List<double> x;

      double[,] y=new double[5,5];

      x = new List<double>();

      for(int i=0;i<5;i++)

      {

         x.Add(i);

         for (int j = 0; j < 4; j++)

         {

             y[i, j] = i+i *i+5+j;

         }

      }   

      var v1 = engine.CreateNumericVector(x);

      var v2 = engine.CreateNumericMatrix(y);

      engine.SetSymbol("v1", v1);

      engine.SetSymbol("v2", v2);

 

        engine.Evaluate("require('ggplot2')");

        engine.Evaluate("library('ggplot2')");

        engine.Evaluate("my_data <- data.frame(v2)");

        engine.Evaluate("colnames(my_data) <- c('Price', 'Quantity')");

        engine.Evaluate("myChart <- ggplot(my_data, aes(x=Price, y=Quantity)) + geom_line()");

        engine.Evaluate("print(myChart)");

 }

      

f、读取R脚本

engine.Evaluate("source('c:/src/path/to/myscript.r')");

可以直接将R语言要执行的代码写成脚本文件，然后直接执行R脚本。

 

 

三、数据类型对应表

R

R.NET

.NET Framework

Note

character vector

RDotNet.CharacterVector

System.String[]

 

integer vector

RDotNet.IntegerVector

System.Int32[]

The minimum value in R is -2^31+1 while that of .NET Framework is -2^31. Missing values are int.MinValue

real vector

RDotNet.NumericVector

System.Double[]

Missing values are represented as double.NaN

complex vector

RDotNet.ComplexVector

System.Numerics.Complex[]

System.Numerics assembly is required for .NET Framework 4.

raw vector

RDotNet.RawVector

System.Byte[]

 

logical vector

RDotNet.LogicalVector

System.Boolean[]

 

character matrix

RDotNet.CharacterMatrix

System.String[, ]

 

integer matrix

RDotNet.IntegerMatrix

System.Int32[, ]

The minimum value in R is -2^31+1 while that of .NET Framework is -2^31.

real matrix

RDotNet.NumericMatrix

System.Double[, ]

 

complex matrix

RDotNet.ComplexMatrix

System.Numerics.Complex[, ]

Reference to System.Numerics assembly is required.

raw matrix

RDotNet.RawMatrix

System.Byte[, ]

 

logical matrix

RDotNet.LogicalMatrix

System.Boolean[, ]

 

list

RDotNet.GenericVector

 

From version 1.1.

data frame

RDotNet.GenericVector

 

From version 1.1. RDotNet.DataFrame class is also available (below).

data frame

RDotNet.DataFrame

 

From version 1.3. And from version 1.5.3,DataFrameRowAttribute and DataFrameColumnAttribute are available for data mapping.

function

RDotNet.Function

 

From version 1.4. Including closure, built-in function, and special function.

factor

RDotNet.Factor

System.Int32[]

From version 1.5.2.

S4

RDotNet.S4Object

 

Not Available Yet. See S4 branch in the source control.

 

四、参考资料及网站

1、添加引用及样例代码 http://rdotnet.codeplex.com/documentation

2、R.Net源码 https://github.com/jmp75/rdotnet

3、老外的简单例子 https://psychwire.wordpress.com/tag/r-net/

4、https://psychwire.wordpress.com/category/r/

5、http://stackoverflow.com/questions/17548072/generate-an-r-timeseries-in-c-sharp-for-use-with-rdotnet?rq=1

6、http://stackoverflow.com/questions/26233526/multi-windows-r-graphs-in-c-sharp-with-rdotnet?rq=1

7、http://stackoverflow.com/questions/18055820/rdotnet-vs-r-scripting?rq=1

8、R软件下载 https://www.r-project.org/

转载于:https://www.cnblogs.com/smilejian/p/4750235.html

weixin_30677073
关注
  • 0
    点赞
  • 踩
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
用C#调用R语言开发.NET MVC Web服务
Talk is cheap, Show me the girl
12-02 2308
R语言是个解释执行的语言，语法风格对于常年写C#的我来说非常怪异。并且R的web包shiny用起来也不是很顺手，所以如果要把R的功能用作生产，我倾向于用高级语言给他做一次封装，这样无论是可扩展性还是性能调优空间都会比较有把握。 用.NET的调用R语言的方法有两种，一是采用R.net库地址，另外一种是利用控制台执行.R代码。我采用的是第二种方法，为什么倾向于第二种后面会说，先简单介绍一下两种不同的方法
在C#中调用R语言
weixin_40532625的博客
04-11 1341
1. https://mirrors.tuna.tsinghua.edu.cn/CRAN/ 安装R3.4.4所有安装最好不要改路径 2.https://mirrors.tuna.tsinghua.edu.cn/CRAN/ 下载DCOM安装 3.https://www.nuget.org/packages/R.NET.Community/1.6.5 VS安装R.NET 程序包管理控...
C#调用R语言之.NET
管理智慧的践行者，社会发展的推动者
02-14 446
Step1:安装R语言软件 Step2：http://visualstudiogallery.msdn.microsoft.com/27077b70-9dad-4c64-adcf-c7cf6bc9970c下载对应studio的NuGet.Tools.vsix安装插件 Step3：https://www.nuget.org/packages/R.NET 安装对应的包 Step4:h
C#实现Windows Form调用R进行绘图与显示的方法
08-31
在本文中，我们将探讨如何使用C#来调用R语言进行绘图，并将生成的图形显示在Windows Form应用程序的用户界面（UI）上。R语言以其强大的统计分析和丰富的图形生成能力而广受赞誉，而C#作为.NET框架的一部分，为开发...
C#调用winrar压缩文件实例---C#.Net实例代码
03-18
在.NET环境中，C#语言可以调用外部程序来执行任务，比如使用WinRAR进行文件的压缩操作。这个实例代码展示了如何在C#中通过启动WinRAR的命令行接口（Rar.exe）来实现文件或文件夹的压缩。下面将详细解释这一过程。 ...
matlab最简单的代码-Wasatch.NET:WasatchPhotonics光谱仪的C＃.NET应用程序驱动程序
05-22
Wasatch.NET有望在所有与.NET兼容的语言中工作，包括： 平台 测试状态 C＃ 在Visual Studio 2017社区中进行了测试 LabVIEW 已在2017年的32位元上进行测试（请参阅） MATLAB / Simulink 已在2017b 64位上进行测试（请...
中控指纹仪Live20R开发包SDK文档和C#等多语言Demo
04-21
"C#Demo"是基于.NET框架的示例程序，它展示了如何在C#环境下使用SDK来实现与Live20R指纹仪的交互。开发者可以通过运行和分析这个Demo，了解如何在C#项目中引入必要的库文件，设置通信参数，注册指纹，以及进行指纹比...
利用R.Net進行數據統計分析
03-15
Using R in C#.net； R is a free software environment for statistical computing and graphics. It compiles and runs on a wide variety of UNIX platforms, Windows and MacOS. 1.install R of windows platform(32bit or 64bit) 2.create a console demo program, and install package R.NET.Community via nuget 3.be careful of your console program build target platform should be the same with R (32bit or 64bit) 4.if you don't register the R tool's env variable, you should config in your initial code REngine.SetEnvironmentVariables(@"C:\Program Files\R\R-3.4.2\bin\x64", @"C:\Program Files\R\R-3.4.2"); fitting-three-parameter-log-normal-distribution-in-R LL3 <- function(X, m, s, t)(1/((X-t)*s*(2*pi)^0.5))*exp(((-(log(X-t)-m)^2)/(2*s^2))) https://stackoverflow.com/questions/23631746/fitting-three-parameter-log-normal-distribution-in-r https://link.springer.com/chapter/10.1007/978-94-017-1431-0_7?no-access=true
一种C#调用R的方法
11-22
提供了一种C#调用R的方法，虽说现在有更好的方法，但是经典不得不了解。
R 语言下常用第三方库的说明
05-13 1601
1. doBy官方文档见 CRAN - Package doBydoBy 主要适用于以下操作： 1) Facilities for groupwise computations of summary statistics and other facilities for working with grouped data: ‘do’ something to data stratified ‘by’
R与C#结合 之 环境配置
weixin_30248399的博客
08-02 352
主要安装步骤 1. 下载R2.11.1这里 2. 在安装R时请确认版本号，然后按默认方式依次安装 3.下载与R版本匹配的rscproxy 包这里(注意版本一定要匹配，否则安装不成功) 4. 接下3中的包，将其拷到R包安装目录下，我的目录是"C:\Program Files (x86)\R\R-2.11.1\library",根据自己电脑情况作适应的调整 5.下载DCOM ...
R语言与.net 集成开发入门
weixin_30278311的博客
05-17 323
首先：R语言的基本教程： https://www.yiibai.com/r/r_environment_setup.html 下载R语言的安装包：https://cran.r-project.org/bin/windows/base/old/3.4.1/ 新建：vs工程控制台 添加nuget包：R.net 添加测试代码： static void Main(string[]...
C#调用R语言脚本及函数
qq_31682605的博客
11-06 2223
C#调用R语言脚本及函数环境准备C#调用R语言脚本C#调用R语言脚本中的某一函数并获得返回值 环境准备 1.在NuGet里找R.net（1.7.0）下载。（我下载安装不成功，报错为：不能安装依赖项DynamicInterop0.8.1，把项目框架改成__.Net Framework 4.6.1__ 就好使了）。 2.安装R软件。（注意不要安装最新的3.5.1版本，我之前安装3.5.1版本 REng...
c#调用R语言（原创翻译）
热门推荐
guoer9973的专栏
05-24 1万+
R.NET使用文档介绍本页面涉及R.NET1.5.13。 1.5.13版本在功能上等同于1.5.12，但可作为一个包在NuGet.org上获得。R.NET使.NET框架与R统计语言在同一进程进行互操作。 R.NET需要.NET Framework 4的并有R环境中安装的本地的DLL。您可以使用R.NET用在.NET的任何语言（它已被用于至少C＃，F＃，Vb.NET，IronPython中）。你使用这
C#执行R文件的简单示例
数据之道
11-28 919
首先下载RDotNet.dll、RDotNet.NativeLibrary.dll、Interop.STATCONNECTORCLNTLib.dll、Interop.StatConnectorCommonLib.dll及Interop.STATCONNECTORSRVLib.dll，引用如下名字空间： using RDotNet; using RDotNet.NativeLibrary; usi...
Jurassic.ScriptEngine 使用
weixin_30847939的博客
09-15 368
标记: Jurassic,js,net Jurassic.ScriptEngine是一个让net动态执行js的一个引擎。类似的有ironjs等。支持ECMAScript 5，非线程安全 使用 using Jurassic; //1简单的执行js字符串 js： function main(a,b) { return a+b; } c# var engine = ...
c#设置触控屏触控自动映射到扩展屏
最新发布
sczmzx的博客
08-01 408
SetDisplayMapping可以实时告知系统当前触控设备映射到哪个屏幕，即使不设置注册表也能够生效（如果你只想设置临时生效，电脑重启后回到默认状态，那么就可以不进行2.3的步骤）当通过2.3在注册表中将关系挂上后，如果不做其它操作，你会发现你的设置是没有生效的，这时可以采用以下几种办法使配置生效。文末提供了源码下载链接。通过调用SetDisplayMapping方法，可以直接完成通知，并且实时生效，完美解决了我的问题。dwm进程结束后，系统会自动重启dwm，当重启完成后，你会发现新的映射已经生效了。
C#知识|文件与目录操作：文本读写操作
做有价值的事，积累有价值的笔记！
07-29 210
哈喽，你好啊，我是雷工！今天学习文件与目录的操作，以下为文本读写操作的学习笔记。
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

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

抵扣说明：

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

余额充值