小编Cam*_* So的帖子

我正在尝试将 生成的多个图存储ggplot2到一个列表中。

我正在尝试使用上一个线程中建议的列表函数，但是我很难创建自己的函数来满足我的需求。

首先，我使用以下代码将基于因子的数据帧拆分为列表：

heatlist.germ <- split(heatlist.germ, f=as.factor(heatlist.germ$plot))

之后，我尝试创建一个稍后可以使用的列表函数lapply。

plot_data_fcn <- function (heatlist.germ) {
  ggplot(heatlist.germ[[i]], aes(x=posX, y=posY, fill=germ_bin)) + 
    geom_tile(aes(fill=germ_bin)) + 
    geom_text(aes(label=germ_bin)) +
    scale_fill_gradient(low = "gray90", high="darkolivegreen4") +
    ggtitle(plot) +
    scale_x_continuous("Position X", breaks=seq(1,30)) +
    scale_y_continuous("Position Y (REVERSED)", breaks=seq(1,20))
  }

heatlist.test <- lapply(heatlist.germ[[i]], plot_data_fcn)

我想要完成的两件主要事情：

1. 将 12 个 ggplots（因此 的 12 个因子plot）存储在列表中。
2. 创建一个名为“Plot [i] Germination”的标题。

任何帮助，将不胜感激。