knit_child and blocks producing multiple plots

[kforner]

just for reference: cf r-lib/evaluate#36

example:
parent.Rnw

\documentclass[letter, margin=1.90cm, 12pt]{scrartcl}
\begin{document}

<<parent_call_child, message = FALSE, include = FALSE, results = 'asis', eval = TRUE>>=
library(ggplot2)
out <- knitr::knit_child('child.Rnw', options = list(fig.keep='all'))
@
\Sexpr{paste(out, collapse="\n")}
\end{document}

child.Rnw

\section{PLOTS}
<<plots_for_loop, message = FALSE, echo = FALSE, results = 'asis', fig.keep = 'all', fig.show = 'asis', eval = TRUE>>=
{
  print(ggplot(iris, aes(x = Species)) + geom_histogram(fill = 'green') + ggtitle(paste('PLOT CHILD 1')))
  print(ggplot(iris, aes(x = Species)) + geom_histogram(fill = 'green') + ggtitle(paste('PLOT CHILD 2')))
}
@

When you knit it, I only get one plot.

[yihui]

Thanks for the report. Since you have identified the problems, it will be great if you can submit pull requests to fix them :)

[kforner]

Sure, but not sure when. I'm in vacation right now...

[yihui]

Okay, I'll take a look then.

[github-actions]

This old thread has been automatically locked. If you think you have found something related to this, please open a new issue by following the issue guide (https://yihui.org/issue/), and link to this old issue if necessary.