How to create a list of ggplot objects that grid.arrange will accept and draw in r

Update The below code runs now after kernel restart. I'm leaving the question since I didn't see this exact method of converting the plot object into a list and appending.

I want to dynamically create a list of ggplot2::ggplot objects (gg) and pass that list to gridExtra::grid.arrange() to draw them.

However, I'm getting errors when I try (see bottom of code below).

How do I create a list of ggplots and use it in grid.arrange() (or anywhere I want one or more gg objects or grobs)?

I've looked at these posts, but the solutions didn't work.

Here's a simple example with outputs:

# RStudio Version 1.3.1093  # R version 4.0.3 (2020-10-10)  # ggplot2 version 3.3.2  # gridExtra version 2.3    library(ggplot2)  library(gridExtra)    test_fun = function (x) {    plt_lst = list()        for(col in colnames(x)){      plt = ggplot(data = x, aes(x = x[ , col])) +        geom_histogram()      plt_lst = append(plt_lst, list(plt))      grid.arrange(plt) # Draws each graph.      print(is(plt))      # [1] "gg"      print(is(plt[[1]]))      # [1] "data.frame" "list"       "oldClass"   "vector"    }        return(plt_lst)  }    df = data.frame(a = rnorm(n = 50),                  b = rnorm(n = 50))    test_plt_lst = test_fun(df)  print(is(test_plt_lst))  # [1] "gg"  print(is(test_plt_lst[[1]]))  # [1] "data.frame" "list"       "oldClass"   "vector"    # grid.arrange(test_plt_lst)  # # Error in gList(list(data = list(a = c(1.14459276559037, 2.33485713757935, : only 'grobs' allowed in "gList"      # Works  do.call(grid.arrange, test_plt_lst)  # The following error no longer appearing.  # Error in `$<-.data.frame`(`*tmp*`, "wrapvp", value = list(x = 0.5, y = 0.5, : replacement has 17 rows, data has 50  

https://stackoverflow.com/questions/65588968/how-to-create-a-list-of-ggplot-objects-that-grid-arrange-will-accept-and-draw-in January 06, 2021 at 09:30AM