Очень похоже на этот пост . Однако у меня есть больше графиков, чем умещается на одной странице, в результате чего оставшиеся графики обрезаются после нажатия кнопки Knit. Кто-нибудь знает, как решить эту проблему путем построения других графиков на следующей странице?
title: 'title'
author: "--"
date: "`r Sys.Date()`"
output: pdf_document
header-includes:
- \usepackage{subfig}
- \usepackage{float}
## To make the example more reproducible ##
```{r echo=FALSE, message=FALSE}
knitr::opts_chunk$set(fig.width=6, fig.height=9, fig.show="hold",
hightligh=TRUE, warnings=TRUE, error=FALSE, cache=FALSE, echo=FALSE,
dpi=100)
```
```{r test, fig.cap='A collection of figs', fig.subcap= "-", out.width="49%", fig.asp=1, fig.ncol = 2, fig.show =
"asis", fig.align="center"}
for (ii in 1:10) {
plot(1:3, 1:3, main=ii)
}
```
## this part is only to resemble the answer by *Michael Harper* in the post mentioned before and should be uncommented to replicate (google maps API needed) ##
# ```{r}
# locations <- c("Southampton, UK", "London, UK", "Bristol, UK",
# "Birmingham, UK", "Liverpool, UK", "Southampton, UK", "London, UK",
# "Bristol, UK", "Birmingham, UK", "Liverpool, UK")
# ggmap::register_google(key = "....")
# ```
# ```{r fig-sub-2, fig.cap='A collection of maps', fig.subcap= locations,
# out.width='.49\\linewidth', fig.asp=1, fig.ncol = 2}
# library(ggmap)
# lapply(locations, function(x)
# ggmap(get_map(x))
# )
# ```
Ответ от Майкл Харпер в том же посте получил меня довольно далеко, но не до такой степени, что количество графиков превышает количество графиков, которые помещаются на одной странице.
выход из вышеприведенного кода, показывающий только 6 из 10 графиков