knitr: показывать подписи к рисункам для нескольких рисунков при настройке размеров рисунка с помощью fig.width - PullRequest
Новая
       5

knitr: показывать подписи к рисункам для нескольких рисунков при настройке размеров рисунка с помощью fig.width

1 голос
/ 25 октября 2019

tldr: Как показать подписи к рисункам для кусков с несколькими фигурами, когда размеры установлены с fig.width и fig.height?

Я пытаюсь использовать rmarkdown для создания PDF. Некоторые фрагменты дают несколько фигур, но заголовок не будет отображаться, если я использую опцию чанка fig.width для установки размера фигуры.

Заголовок отображается с fig.width, если блок создает одну фигуру:

```{r demo_1, fig.width=3, fig.cap="I work because I produce one plot, even though I use fig.width"}
iris %>%
  ggplot(aes(x=Sepal.Length, y=Sepal.Width))+
  geom_point()
```

Заголовок отображается с out.width, если блок создает несколько цифр: 

```{r demo_2, out.width="50%", fig.show="hold", fig.cap="I work because I use out.width"}
iris %>%
  ggplot(aes(x=Sepal.Length, y=Sepal.Width))+
  geom_point()+
  labs(tag="A")

iris %>%
  ggplot(aes(x=Petal.Length, y=Petal.Width))+
  geom_point()+
  labs(tag="B")
```

Заголовок не отображается с fig.width, если блок создает несколько цифр: 

```{r demo_3, fig.width=3, fig.show="hold", fig.cap="I don't work because I set fig.width"}
iris %>%
  ggplot(aes(x=Sepal.Length, y=Sepal.Width))+
  geom_point()+
  labs(tag="A")


iris %>%
  ggplot(aes(x=Petal.Length, y=Petal.Width))+
  geom_point()+
  labs(tag="B")
```
...