R：如何组合在for循环中创建的图

Question

因此，我在2013年至2017年之间通过变量MULTYEAR创建了一个for wich过滤器。 我为每个人创建了一个不同的图表。现在，我想使用grid.arrange来组合for循环中的每个图表。有人有什么建议吗？通过使用print(Grafikm)，我可以分别获得它们。

for(year in 2013:2017){
Datenw <- Datengf %>%
  filter(SEX == 2 & MULTYEAR == year)%>%
  group_by(Schulbildung) %>% 
  count() %>%
  ungroup() %>%
  mutate(Schulbildung = ifelse(Schulbildung < 12, "others", Schulbildung)) %>%
  group_by(Schulbildung) %>%
  summarise(n = sum(n))%>%
  mutate(per=n/sum(n)) 


Datenm$label <- scales::percent(Datenm$per)

Grafikf <- Datenw%>%
            ggplot(aes(x =Schulbildung,y =per,fill = Schulbildung))+
            geom_bar(width =1,stat ="identity",col ="black") +
            ggtitle("Anteil Schulbildung bei den Frauen", year)+
            ylim(0,0.5)


print(Grafikf)


}