使用mcmc_areas（）函数绘制多个图的问题

Question

因此，我想使用贝舍平台创建几块后验样品图。 我的数据包含几个绘制分为特征（列“相关”包含后值）：

head（cors_feat [cors_feat $ feature == 1，]）

  feature correlation
1       1  -0.5002517
2       1   0.1964202
3       1  -0.8603918
4       1  -0.7111672
5       1   0.1760033
6       1   0.2788863

head（cors_feat [cors_feat $ feature == 2，]））

      feature correlation
40001       2  -0.7149123
40002       2  -0.7666210
40003       2  -0.7542937
40004       2  -0.2094619
40005       2   0.4089077
40006       2  -0.8550481

i循环通过功能，在循环中，我使用函数mcmc_areas（）创建图：

lst <- list()
for (i in 1:length(unique(cors_feat$feature))){
  lst <- c(lst,mcmc_areas(cors_feat[cors_feat$feature==i,], pars = c("correlation"), prob = 0.95))
}

当我尝试尝试时从“ cowplot”库中使用plot_grid函数，我会收到以下错误：

plot_grid(plotlist = lst)
There were 50 or more warnings (use warnings() to see the first 50)

最重要的是，我看不到任何图。

我该如何解决这个问题？