R 如何使用plotly打印多个打印

我有一个几乎有300个绘图的绘图列表。是否有一种方法可以使用plotly打印阵列中的所有打印？我不知道如何创建包含这么多情节的子情节

这是我的密码：

plot_list = list()
for(i in 2:length(colnames.no.na.work.df.worldbank.2009)){

  # Create columns for buffer.data.frame to plot
  first.column.buffer <- no.na.work.df.worldbank.2009$`country name`
  second.column.buffer <- round(as.numeric(unlist(no.na.work.df.worldbank.2009[134])))
  third.column.buffer <- round(as.numeric(unlist(no.na.work.df.worldbank.2009[i])))
  colnames.no.na.work.df.worldbank.2009 <- colnames(no.na.work.df.worldbank.2009)

  # Create buffer.data.frame to plot
  buffer.data.frame <- cbind.data.frame(first.column.buffer, second.column.buffer, third.column.buffer, stringsAsFactors = FALSE)
  colnames(buffer.data.frame) <- (c("c", "b", "a"))

  # Safe plot in array
  p <- ggplot(buffer.data.frame, aes(a, b, name = c)) + ggtitle("Title") + theme(plot.title = element_text(hjust = 0.5)) +
    xlab(colnames.no.na.work.df.worldbank.2009[i]) + ylab(colnames.no.na.work.df.worldbank.2009[134]) + geom_point() 
  plot_list[[i-1]] = p
}

plot\u list=list（）
用于（第2部分：长度（colnames.no.na.work.df.worldbank.2009））{
#为buffer.data.frame创建要打印的列
first.column.buffer您可以将所有项目放在一个包含在div中的列表中，以便控制样式。
使用uiOutput（）显示它

#必须为函数提供plotly plot_列表
输出$all_plots谢谢你，米盖尔斯。我不太明白！我在上面的问题中添加了我的代码。我得到了不同的错误，比如“输出$all_plots中的错误”
# You have to provide the plotly plot_list to the function
output$all_plots <- shiny::renderUI({
    all_plots <- list()
    for (n in seq_along(plot_list)) {
        all_plots[[n]] <- div(style="padding:5px; margin: 5px;",plot_list[[n]])
    }
    return(all_plots)
})