group_nest して map で ggplot を作ったあと、そのfigsをまとめて1つのfigにしたいときがある。 そういうときに patchwork::wrap_plots が便利。 例えばこんなコード。 pacman::p_load(tidyverse) d_plot <- iris %>% group_nest(Species) %>% mutate( figure = map( .x = data, .f = ~ { ggplot(data = .x) + geom_point(aes(x = Sepal.Length, y = Sepal.Width)) } ) ) patc…