VS、C#配置R语言开发环境

R语言学习笔记（一）——在Vs、C#中配置R语言开发环境。

最近在学习小众的R语言，所以将遇到的问题记录下来供大家参考，不足之处欢迎大家交流指正。

至于R语言的介绍就不多说了，它集成了复杂的数学算法，将之封装成简单函数，开发者可以直接调用，使用得当绝对是一把利器。

配置前准备：

1.R语言安装包，因为是开源的所以大家可以直接去官网下载。https://cran.r-project.org/src/base/R-3/

官网最新版是3.6.1，我这是使用的是3.4.1。

安装包P地址

链接：https://pan.baidu.com/s/16Z4gD9uhIdDoqttkrJ7KBw
提取码：xbj2

 

注意：R语言的安装包版本要与下面的引用类库版本兼容，不然就会出现

engine = REngine.GetInstance(); engine = null的情况。

我这里使用的3.4.1与类库版本亲测兼容，大家嫌麻烦可以直接使用我的。但是版本最高支持.netFrameWork 4.5。

2.R环境的引用类库。

直接网盘奉献:

链接：https://pan.baidu.com/s/1wYSLbXDs3CD6hFp5tcPKHg
提取码：w2lo

正式开始：
一.打开下载好的安装包，注意：要用管理员权限打开。

然后一步一步下一步。

 

 

 

下一步安装即可。

二.打开VS，我这里是2012。

1.新建控制台

2.添加引用

 

3.可以将下面这段代码拷走测试

先设置R语言路径、环境，后进行函数调用。

这里给了两种测试代码。

        static void Main(string[] args)
        {
           Program mypro = new Program();
           mypro.ExcuteCode();
        }
        private REngine engine;

        #region 测试代码
        public void ExcuteCode()
        {
            InitREngine();
            #region Test1

            using (engine = REngine.GetInstance(null, true, null, null))
            {
                engine.Initialize(); // required since v1.5
                CharacterVector charVec = engine.CreateCharacterVector(new[] { "Hello, R world!, .NET speaking" });
                engine.SetSymbol("greetings", charVec);
                engine.Evaluate("str(greetings)"); // print out in the console
                string[] a = engine.Evaluate("'Hi there .NET, from the R engine'").AsCharacter().ToArray();
            }

            Console.ReadKey();

            #endregion

            #region Test2

            // 初始化R环境
            //engine = REngine.GetInstance(null, true, null, null);

            //// .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);

            //// you should always dispose of the REngine properly.
            //// After disposing of the engine, you cannot reinitialize nor reuse it
            //engine.Dispose();
            //Console.ReadKey();

            #endregion

        } 
        #endregion

        #region 配置R环境
        public void InitREngine()
        {
            var oldPath = System.Environment.GetEnvironmentVariable("PATH"); /////C:\Program Files\R\R-3.5.1\bin
            var rPath = System.Environment.Is64BitProcess
                ? @"C:\Program Files\R\R-3.4.1\bin\x64"
                : @"C:\Program Files\R\R-3.4.1\bin\i386";
            if (Directory.Exists(rPath) == false)
            {
                throw new DirectoryNotFoundException(
                    string.Format("Could not found the specified path to the directory containing R.dll: {0}", rPath));
            }

            var newPath = string.Format("{0}{1}{2}", rPath, System.IO.Path.PathSeparator, oldPath);
            System.Environment.SetEnvironmentVariable("PATH", newPath);
            // NOTE: you may need to set up R_HOME manually also on some machines
            string rHome = "";
            var platform = Environment.OSVersion.Platform;
            switch (platform)
            {
                case PlatformID.Win32NT:
                    break; // R on Windows seems to have a way to deduce its R_HOME if its R.dll is in the PATH
                case PlatformID.MacOSX:
                    rHome = "/Library/Frameworks/R.framework/Resources";
                    break;
                case PlatformID.Unix:
                    rHome = "/usr/lib/R";
                    break;
                default:
                    throw new NotSupportedException(platform.ToString());
            }

            if (!string.IsNullOrEmpty(rHome))
            {
                Environment.SetEnvironmentVariable("R_HOME", rHome);
            }
        } 
        #endregion

 

持续更博中...