Блог

Я пытаюсь построить некоторые графики, используя Java и R (JRI и Rengine). Когда я пишу что-то подобное в своем коде, это работает нормально:

 re.eval("plot(c(1,5,3,8,5), type='l', col=2)");
 

Но если я напишу это:

 re.eval("source("C:\Documents and Settings\abc\My Documents\Test Data\BoxPlot.r");");
 

окно вывода на мгновение мигает и исчезает. Этот указанный файл содержит только 1 команду, как и первая, т.е. re.eval("plot(c(1,5,3,8,5), type='l', col=2)");

Я очень новичок в R, так что это может быть очень простой вопрос. Но я не могу это выяснить. Кто-нибудь может мне помочь?

Спасибо.

РЕДАКТИРОВАТЬ 1

Я использую Windows XP.

Вот полный код:

 import org.rosuda.JRI.Rengine;

public class JavaGDExample1 {

  public static void main(String[] args) {
    Rengine re;
    String[] dummyArgs = new String[1];
    dummyArgs[0] = "--vanilla";
    re = new Rengine(dummyArgs, false, null);
    re.eval("library(JavaGD)");

    // This is the critical line: Here, we tell R that the JavaGD() device that
    // it is supposed to draw to is implemented in the class MyJavaGD. If it were
    // in a package (say, my.package), this should be set to
    // my/package/MyJavaGD1.
    re.eval("Sys.putenv('JAVAGD_CLASS_NAME'='MyJavaGD1')");

    re.eval("JavaGD()");
//    re.eval("plot(c(1,5,3,8,5), type='l', col=2)");
    re.eval("source("C:\Documents and Settings\abc\My Documents\Test Data\BoxPlot.r");");
//    re.eval("source("C:\Documents and Settings\abc\My Documents\Test Data\testPlot.r")");
    re.end();
  }
}


import javax.swing.JFrame;

import org.rosuda.javaGD.GDCanvas;
import org.rosuda.javaGD.GDInterface;

/**
 * This is a minimal reimplementation of the GDInterface. When the device is opened, 
 * it just creates a new JFrame, adds a new GDCanvas to it (R will plot to this GDCanvas)
 * and tells the program to exit when it is closed.   
 */
public class MyJavaGD1 extends GDInterface {
  public JFrame f;

  public void gdOpen(double w, double h) {
    f = new JFrame("JavaGD");
    c = new GDCanvas(w, h);
    f.add((GDCanvas) c);
    f.pack();
    f.setVisible(true);
    f.setTitle("Naked R plot");
    f.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
  }

}
 

Ваш путь неверен — вы вводите цитируемый ад, то, что вы отправили в R, является

  source("C:Documents and SettingsabcMy DocumentsTest DataBoxPlot.r");
 

что недопустимо:

  > source("C:Documents and SettingsabcMy DocumentsTest DataBoxPlot.r");
 Error: 'D' is an unrecognized escape in character string starting "C:D"
 

Чтобы избежать ада с кавычками, безопаснее назначать имена файлов:

  re.assign("fn", "c:\foo\bar");
 re.eval("source(fn)");
 

или использовать / вместо \

PS: используйте stats-rosuda-devel для вопросов rJava / JRI

re.eval("Sys.putenv('JAVAGD_CLASS_NAME'='MyJavaGD1')");

должно быть сейчас

re.eval("Sys.Sys.setenv('JAVAGD_CLASS_NAME'='MyJavaGD1')");

Sys.setenv() является новым (и предпочтительным) синонимом Sys.putenv() и теперь устарел в пользу Sys.setenv() .

Источник