将绘图保存到图像，然后在绘图上绘制其他线条并再次保存。

Question

我试图在R中绘制条形图，将其保存到png文件中，然后在其上绘制更多内容并再次保存。到目前为止，我的尝试以错误plot.new has not been called yet结束。相应的代码是

  # Draw without lines
  png(c(name, '.png'), width=480, height=240);
  stripchart(data, pch=4, method='jitter');
  dev.off();

  # Draw with with lines
  png(c(name, '_with_trim_points', '.png'), width=480, height=240);
  abline(v=points, untf = FALSE, col='red');
  abline(v=more__points, untf = FALSE, col='green')
  dev.off();

只是第二次调用stripchart(data, pch=4, method='jitter');不是一种选择，因为抖动会有所不同，最终会得到不同的散点图。

Answer 1

使用种子和生成的数据

#generate data
data=data.frame(x=rnorm(40),y=rnorm(40))
points=c(-2,0)
more__points=c(1,2)



# Draw without lines
set.seed(123)
png(paste0(name, '.png'), width=480, height=240);
stripchart(data, pch=4, method='jitter');
dev.off();

# Draw with with lines
set.seed(123)
png(paste0(name, '_with_trim_points', '.png'), width=480, height=240);
stripchart(data, pch=4, method='jitter');
abline(v=points, untf = FALSE, col='red');
abline(v=more__points, untf = FALSE, col='green')
dev.off();

Answer 2

您可以保存图表并使用＆＃39; saveRDS＆＃39;保存它，然后您可以随时加载它并继续工作。