在previous question中,我写了一个函数 f1 <- function(n,m,priceinitial,delta,mean, sd, ninterval)
,根据各种规则绘制价格。我添加了以下代码:
f2 <- function(nsim){
for(i in 1:nsim)
{
f1(1000,100,100,10,10,1,100)
}
}
基本上我想多次重复相同的实验并将所有图表保存在一个文件中。我该怎么做?
答案 0 :(得分:0)
您可以做的一件事是收集一个绘图变量中的所有输出并将其作为单个文件导出,否则,您将一遍又一遍地写入同一文件。
jpeg(filename = "plot1.jpeg", width = 2000, height = 2000)
par(mfrow = c(nsim, 1))
f2(nsim)
dev.off()