【问题标题】:C# : can't execute code from RC#:无法从 R 执行代码
【发布时间】:2015-08-29 18:02:52
【问题描述】:

我想在 C# 中显示椭圆。我的代码在 R 中运行时很好,但我从 c# 收到这样的消息: “对象是静态的;不允许操作(来自 HRESULT 的异常:0x8004000B (OLE_E_STATIC))”

这是我的代码:

df.rconn.Evaluate("library(cluster)")
df.rconn.Evaluate("library(rrcov)")
public void setScatter(int xAxis, int yAxis, int zAxis, List<string> variable) 
    {

        // plot from R
        //to show outlier with method : classic & robust Mve 
        this.comboBoxXAxis.SelectedIndex = xAxis;
        this.comboBoxYAxis.SelectedIndex = yAxis;
        dataform.rconn.EvaluateNoReturn("x<-X[," + xAxis + "] ");
        dataform.rconn.EvaluateNoReturn("y<-X[," + yAxis + "] ");
        dataform.rconn.EvaluateNoReturn("shape <- cov(X)");
        dataform.rconn.EvaluateNoReturn("center<- colMeans(X)");
        dataform.rconn.EvaluateNoReturn("d2.95 <- qchisq(0.95, df = 2)");
        //dataform.rconn.EvaluateNoReturn("gr<- grid(lty=3,col='lightgray', equilogs = 'TRUE')");
        //dataform.rconn.Evaluate("mtext('with classical (red) and robust (blue)')");
        dataform.rconn.EvaluateNoReturn("plot(x,y, main='Draw Ellipse ', pch=19,col='black', type='p')");
        dataform.rconn.EvaluateNoReturn("elp<- unname(ellipsoidPoints(shape, d2.95,center))");
        dataform.rconn.Evaluate(" lines(elp, col='red' , lty=7 , lwd=2)");
        //dataform.rconn.EvaluateNoReturn("lines(e)");
        //dataform.rconn.EvaluateNoReturn("lines(ellipsoidPoints(mve@cov, d2 = d2.95, loc=mve@center), col='blue', lty='7' , lwd='2') ");
        axGraphicsDevice2.RemoveFromConnector();
    }

在我评论的任何代码中总是出现相同的错误。我不知道为什么会出现这个问题。知道如何显示那个椭圆吗?非常感谢您,因为您帮助我完成了论文。

【问题讨论】:

  • 如果通过它调试,它在哪一行失败?
  • 什么是 rconn?你的操作系统是什么?请包括相关信息。 stackoverflow.com/help/how-to-ask
  • @SteveFerg:我在使用函数 ellipsoidPoints 时出错

标签: c# r outliers drawellipse


【解决方案1】:

一些缺失的上下文信息,但根据您提供的猜测,当操作刷新图形设备(线条、多行文本等)时,您的“rconn”(statconnector?)不满意。

出于我自己的目的,我需要从 c#(使用 R.NET)测试一些 R 图形内容,因此我以您的代码为基础,并建议您将其作为一种解决方法供您尝试。您将在 GitHub 上的以下位置找到一个使用 R.NET 的示例控制台应用程序: https://github.com/jmp75/rdotnet-support/tree/master/samples/DrawEllipse

从 VS2013、Windows7 64 位、.NET 框架 4.5 编译/运行。

我注意到我需要选择性地使用 dev.hold 和 dev.flush 来获得直观的刷新。

e.Evaluate("dev.hold()");
e.Evaluate("mtext('with classical (red) and robust (blue)')");
e.Evaluate("dev.flush()");

希望这会有所帮助。

【讨论】:

  • 是的。我使用statconnector。顺便问一下, dev.hold 和 dev.flush 的作用是什么? - @j-m
猜你喜欢
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 2013-06-28
  • 2017-03-01
  • 1970-01-01
  • 2018-11-16
  • 1970-01-01
  • 1970-01-01
相关资源
最近更新 更多