我想在一个asp.net c#的网页应用程序中使用R脚本。我正在尝试使用一个简单的R脚本,将两个字符串连接成一个。
以下是我的C#代码:
using RDotNet;
using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls;
public partial class _Default : System.Web.UI.Page
{
protected void Page_Load(object sender, EventArgs e)
{
}
private static double EvaluateExpression(REngine engine, string expression)
{
var expressionVector = engine.CreateCharacterVector(new[] { expression });
engine.SetSymbol("expr", expressionVector);
// WRONG -- Need to parse to expression before evaluation
//var result = engine.Evaluate("eval(expr)");
// RIGHT way to do this!!!
var result = engine.Evaluate("eval(parse(text=expr))");
var ret = result.AsNumeric().First();
return ret;
}
public static void SetupPath(string Rversion = "R-3.2.1")
{
var oldPath = System.Environment.GetEnvironmentVariable("PATH");
var rPath = System.Environment.Is64BitProcess ?
string.Format(@"C:\Program Files\R\{0}\bin\x64", Rversion) :
string.Format(@"C:\Program Files\R\{0}\bin\i386", Rversion);
if (!Directory.Exists(rPath))
throw new DirectoryNotFoundException(
string.Format(" R.dll not found in : {0}", rPath));
var newPath = string.Format("{0}{1}{2}", rPath,
System.IO.Path.PathSeparator, oldPath);
System.Environment.SetEnvironmentVariable("PATH", newPath);
}
protected void Button1_Click(object sender, EventArgs e)
{
SetupPath();
REngine.SetEnvironmentVariables();
REngine engine = REngine.GetInstance();
// REngine requires explicit initialization.
// You can set some parameters.
engine.Initialize();
//engine.Evaluate("G<-5+3+2");
engine.Evaluate("G<-paste('hello from r', 'Test')");
Label1.Text = EvaluateExpression(engine, "G").ToString();
}
}
我有一个点击按钮,当我点击它时,希望输出显示在网页上。
当我运行代码并单击按钮时,标签控件页面中显示的文本为
NaN
然而,当我运行
engine.Evaluate("G<-5+3+2");
替代
engine.Evaluate("G<-paste('hello from r', 'Test')");
我在页面标签中正确获取到了数值10。但是我不知道如何将输出显示在网页上,也不知道这个错误是什么。我尝试在一些网站上寻求帮助,但是所有的代码都是针对控制台应用程序编写的,没有针对asp.net web应用程序的代码。请问有人能帮我解决问题并在我的网页上显示输出结果吗?