保存 qgraph 在 for 循环中不起作用,但在外部

Saving qgraph doesnt work in for loop, but outside

我正在尝试使用 qgraph() 创建并保存多个绘图。到目前为止我试过:

for (i in 1:100){
    png(paste(i,".png",sep="_"))
    qgraph(l[[i]])
    dev.off()
}

l 是 100 个权重矩阵的列表。

在 for 循环之外创建绘图没有问题。

for 循环也适用于 plot(),而不是 qgraph()

或者我使用:

qgraph.animate(l,progress=FALSE)

使用 qgraph.animate() 创建 100 个地块。有办法拯救他们吗?这也将具有能够使用约束参数的好处。

我找到了解决我自己问题的方法。 需要两步才能到达那里。

  1. 创建并保存地块列表:

    tert1_aggr_dates_coef_qgraph<-qgraph.animate(l,progress=F, constraint = .1)

  2. 在 for 循环中使用绘图列表来创建和保存绘图。

    for(我在 1:100){

    jpeg(粘贴(i,".jpg"))

    qgraph(tert1_aggr_dates_coef_qgraph[[i]])

    dev.off()}