Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/79.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 理解cowplot_网格中的重复绘图_R - Fatal编程技术网

R 理解cowplot_网格中的重复绘图

R 理解cowplot_网格中的重复绘图,r,R,极度需要精神检查。我很难理解为什么我的代码中N个图的plot_grid(cowplot)结果会产生N个相同的图。从我提供的列表中,我取出了每个数据框,以验证每个绘图是否应该不同,但是,当我将完整列表传递到绘图网格时,它们看起来都是相同的 p <- vector("list",length(dataList)) for(i in 1:length(dataList)) { df <- dataList[[i]] p[[i]] <- ggplot(df, aes(df$ba

极度需要精神检查。我很难理解为什么我的代码中N个图的plot_grid(cowplot)结果会产生N个相同的图。从我提供的列表中,我取出了每个数据框,以验证每个绘图是否应该不同,但是,当我将完整列表传递到绘图网格时,它们看起来都是相同的

p <- vector("list",length(dataList))
for(i in 1:length(dataList)) {
  df <- dataList[[i]]
  p[[i]] <- ggplot(df, aes(df$base)) + geom_bar()
}

multi <- plot_grid(plotlist=p, align="hv")

save_plot(paste("data_freqs.tiff",sep=""), multi, dpi=300, base_aspect_ratio=1.5)

p在寻求帮助时,您应该包括一个简单的示例输入和所需输出,用于测试和验证可能的解决方案。请注意,ggplot对象是惰性的,它们的参数只有在
print()
-ed之后才会计算。所有对象的定义方式与
ggplot(df,aes(df$base))+geom_bar()
完全相同,并且在循环结束时,只有一个
df
变量存在,它将具有循环的最后一个值。相关:相关:相关:
a<-dataList[[1]]
b<-dataList[[2]]
sum(a$base=="T")
>1245
sum(b$base=="T")
>1034