knitr / Rmarkdown: фигуры рядом с одной подписью - PullRequest
0 голосов
/ 01 мая 2020

В документе .Rmd есть несколько способов создания фигур рядом друг с другом. Если цифры уже существуют, для меня самый простой способ - использовать knitr::include_graphics(c(fig1, fig2, ...)) [Thx: Yihui!]

Но когда я делаю это, я не могу найти способ добавить общую подпись к цифре, так как это легко сделать в LaTeX. Вот пример:

чанк

```{r, out.width = "30%", echo=FALSE}
# two figs side by side
include_graphics(c("fig/mathscore-data.png",
                   "fig/mathscore-data-ellipses.png"))
```

Выход:

enter image description here

Если я добавлю fig.cap к параметрам чанка, я получу две отдельные фигуры, каждая с одинаковым заголовком.

```{r, out.width = "30%", echo=FALSE, fig.cap="Left: scatterplot of mathscore data; Right: Data ellipses for the two groups."}
# two figs side by side
include_graphics(c("fig/mathscore-data.png",
                   "fig/mathscore-data-ellipses.png"))
```

enter image description here

Is есть какой-то другой способ сделать то, что я хочу - две фигуры рядом с общей подписью?

1 Ответ

2 голосов
/ 01 мая 2020

возможны оба варианта: knitr или обычный латекс.

in knitr установите для параметра чанка значение:

echo=FALSE,out.width="49%",out.height="49%",fig.show='hold',

fig.align = 'center'

Я использовал подпакет пакета latex ,

, импортированный в раздел заголовка-включения заголовка YAML.

---
title: "Untitled"
author: "V"
date: "22 4 2020"
output: pdf_document
header-includes:
  - \usepackage{subcaption}
---


# add Two figures with latex

\begin{figure}[h]
\begin{subfigure}{.5\textwidth}
\includegraphics[]{CAT.png}
\end{subfigure}%
\begin{subfigure}{.5\textwidth}
\includegraphics[]{CAT.png}
\end{subfigure}
\caption{This is the main caption - Years 2020 - 2030 - the main caption. }
\end{figure}

#  add Two figures with Knitr 


```{r, echo=FALSE,out.width="49%",out.height="49%",fig.show='hold',
fig.align='center', fig.cap="This is the main caption - Years 2020 - 2030 - the main caption."}
knitr::include_graphics(c("CAT.png","CAT.png"))

enter image description here

...