2017-04-19 107 views
0

我有,它返回使用R.Net显示由R代码在MVC应用程序

output <- return(list(add,diff,prod,div)) 

我需要显示这些结果在使用R. MVC应用程序号码的列表的R代码返回的对象的列表中净。我可以在控制台应用程序的情况下显示这个,但不能在MVC中显示。该应用程序未能显示结果,创建以下错误:无法加载资源:服务器响应状态为500(内部服务器错误)。任何人都可以告诉我什么是我的以下控制器代码有问题:

 public JsonResult OperatoR(int Text1, int Text2) 
     { 
     REngine.SetEnvironmentVariables(); 
     REngine engine = REngine.GetInstance(); 

     var v = engine.CreateInteger(Text1); 
     var u = engine.CreateInteger(Text2); 

     engine.SetSymbol("u", u); 
     engine.SetSymbol("v", v); 

     engine.Evaluate("setwd(\"D:/Users/h224086/Desktop\")"); 
     engine.Evaluate("file<-dget(\"operators.r\")"); 
     engine.Evaluate("exec<-file(u,v)"); 
     var sum = engine.Evaluate("exec").AsIntegerMatrix(); 

     return Json(sum, JsonRequestBehavior.AllowGet); 
     } 

回答

0

我已经解决了这个问题。您需要修改

var sum = engine.Evaluate("exec").AsIntegerMatrix(); 

IntegerVector group1 = engine.Evaluate("exec").AsInteger();    
engine.SetSymbol("group1", group1); 
相关问题