2017-04-19 73 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); 
相關問題