在R中使用循环中的函数调用绘制多个图

Question

我正试图用以下代码绘制多个图。（da.list是xts对象的列表，chart_Series是quantmod包中的绘图函数。）

library(quantmod)
plotLoan = function(loanID){
  chart_Series( da.list[[loanID]], name = paste0('Loan ID: ', loanID))
}
LoanIDs = sample(names(da.list),6)
for (LoanID in LoanIDs) plotLoan(LoanID)

我没有得到任何输出。但是，plotLoan(LoanIDs[1])生成了一个预期的绘图。为什么这不能循环工作？

Answer 1

您尝试过使用layout命令吗？不确定到底发生了什么，但我认为这与图形设备中没有足够的空间有关。你可以试试

layout(matrix(seq(6), nrow=3, ncol=2))
layout.show(6)

其将对图形输出进行分区并显示接下来的6个绘图将去往何处。如果要绘制不同数量的绘图，则必须根据需要选择尺寸。