Rmarkdown：为什么循环中的图形会跳过页面？

Question

我在Rmarkdown中写报告，发现绘图时遇到麻烦  ggplot2图形位于for循环内。问题是我在PDF输出中的图形之间跳了一页。

我的代码运行完美，并且我已经测试了一些替代方法： 我在任何循环外绘制了两个图形的两个副本，问题得以解决。同样，在迭代的开始和结尾处打印一些随机消息表明，当循环变量增加时，会自动分页。有谁知道如何解决这个问题？

预先感谢

编辑：添加代码

library(dplyr)
library(ggwordcloud)

for(i in 1:7){
  aux <- arrange(as.data.frame(extrai_palavras(dados[i, ], "count")), desc(Freq))
  med <- mean(aux$Freq)
  sd <- sd(aux$Freq)
  aux <- aux %>% filter(Freq - med > 2 * sd)
  ggwordcloud2(aux) %>% print()
}

我无法在此处上传数据，但这是一个具有两个列的数据框，第一个是单词标记，第二个是单词的频率（Freq）。

编辑2：可复制的示例

这是一个可复制的示例，它完全没有意义，但是当从中生成pdf时却产生了我的问题。

library(tidyverse)
treshold <- c(0, 10, 20, 30, 40)
for(i in 1:(length(treshold)-1)){
  plot <- mtcars%>%
    filter(mtcars$mpg > treshold[i] && mtcars$mpg < treshold[i+1]) %>%
    ggplot(aes(x = disp, y = hp, fill = as.factor(cyl)))+
    xlab("") + 
    ylab("Total de ocorr?ncias") + 
    ggtitle("Palavras mais frequentes") +
    coord_flip() + 
    geom_point()
  print(plot)
}