c# R

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:http://rdotnet.codeplex.com/ 粘贴测试用例运行

Step5:运行出现莫名错误,下载RExcel安装 http://rcom.univie.ac.at/download.html即可解决问题


using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using RDotNet;
using System.IO;
namespace csharp
{
    class Program
    {
        static void Main(string[] args)
        {
            // Set the folder in which R.dll locates.
            // See Documentation for automatic search of installation path.
            // This example set PATH environment variable for 64-bit process and R x64 on Windows.
            // You should appropriately set the correct location for other cases.
            // Refer to the Documentation page.
            var envPath = Environment.GetEnvironmentVariable("PATH");
            var rBinPath = @"C:\Program Files\R\R-3.0.1\bin\i386";
            Environment.SetEnvironmentVariable("PATH", envPath + Path.PathSeparator + rBinPath);

            // For Linux or Mac OS, R_HOME environment variable may be needed.
            //Environment.SetEnvironmentVariable("R_HOME", "/usr/lib/R")

            using (REngine engine = REngine.CreateInstance("RDotNet"))
            {
                // From v1.5, REngine requires explicit initialization.
                // You can set some parameters.
                engine.Initialize();

                // .NET Framework array to R vector.
                NumericVector group1 = engine.CreateNumericVector(new double[] { 30.02, 29.99, 30.11, 29.97, 30.01, 29.99 });
                engine.SetSymbol("group1", group1);
                // Direct parsing from R script.
                NumericVector group2 = engine.Evaluate("group2 <- c(29.89, 29.93, 29.72, 29.98, 30.02, 29.98)").AsNumeric();

                // Test difference of mean and get the P-value.
                GenericVector testResult = engine.Evaluate("t.test(group1, group2)").AsList();
                double p = testResult["p.value"].AsNumeric().First();

                Console.WriteLine("Group1: [{0}]", string.Join(", ", group1));
                Console.WriteLine("Group2: [{0}]", string.Join(", ", group2));
                Console.WriteLine("P-value = {0:0.000}", p);
            }
        }
    }
}


  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

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

抵扣说明:

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

余额充值