R 导出打印变量将显示空白图像

我正在使用JRI进行java和R集成。 请找到下面的脚本

            String path = "C:\\Users\\hrpatel\\Desktop\\CSVs\\DataNVOCT.csv";
            rengine.eval("library(tseries)");
            rengine.eval(String.format("mydata <- read.csv('%s')",path.replace('\\', '/')));
            String exportFilePath= "C:\\Users\\hrpatel\\Desktop\\CSVs\\arima3.jpg";
            rengine.eval("Y <- NewVisits");
            rengine.eval("t <- Day.Index");
            rengine.eval("summary(Y)");
            rengine.eval("adf.test(Y, alternative='stationary')");
            rengine.eval("adf.test(Y, alternative='stationary', k=0)");
            rengine.eval("acf(Y)");
            rengine.eval("pacf(Y)");
            rengine.eval("mydata.arima101 <- arima(Y,order=c(1,0,1))");
            rengine.eval("mydata.pred1 <- predict(mydata.arima101, n.ahead=1000)");
            rengine.eval(String.format("jpeg('%s')",exportFilePath.replace('\\', '/')));
            rengine.eval("plot(t,Y)");
            rengine.eval("lines(mydata.pred1$pred, col='blue',size=10)");
            rengine.eval("lines(mydata.pred1$pred+1*mydata.pred1$se, col='red')");
            rengine.eval("lines(mydata.pred1$pred-1*mydata.pred1$se, col='red')");
            rengine.eval("dev.off()");

String path=“C:\\Users\\hrpatel\\Desktop\\CSVs\\DataNVOCT.csv”；
rengine.eval（“图书馆（tseries）”）；
rengine.eval（String.format（“mydata如果我理解正确，您有一个名为mydata的数据集，它有两列，newvisions和Day.Index，在这种情况下，您需要更改：

rengine.eval("Y <- NewVisits");

rengine.eval（“你有没有想法将google analytics集成到java中并下载其数据。我已经使用appengine项目尝试过同样的方法，但下载文件数据有限制，因为appengine限制了FileWriter APi。r中有一个google analytics包，你可能想使用它
rengine.eval("Y <- mydata$NewVisits");

rengine.eval("t <- Day.Index");

rengine.eval("t <- mydata$Day.Index");