Как выровнять таблицу и график в rmarkdown html_document

Question

Как я могу выровнять таблицу kable так, чтобы она была смежной с графиком ggplot2 в rmarkdown html_document?

Foo.Rmd

---
title: "Foo"
output: html_document
---

```{r setup, include=FALSE}
library(ggplot2)
library(knitr)
library(kableExtra)
```

# Table next to plot
```{r echo = FALSE}
kable(head(iris)) %>%
  kable_styling(bootstrap_options = "striped", full_width = F)

ggplot(iris, aes(x = Sepal.Length, y = Sepal.Width)) + geom_point()
```

Я пытался следовать решению здесь , но безрезультатно.

Answer 1

@ErrantBard предлагает отличное решение этой проблемы: https://stackoverflow.com/a/40650190/645206. Пожалуйста, посетите и оцените его!Я копирую решение в своем ответе, чтобы показать, как оно работает с вашим примером, и предоставить образ решения.

Чтобы лучше понять, как работают эти div теги, узнайте больше о библиотеке начальной загрузки.Вот одна хорошая ссылка: https://getbootstrap.com/docs/4.1/layout/grid/

---
title: "Foo"
output: html_document
---

```{r setup, include=FALSE}
library(ggplot2)
library(knitr)
library(kableExtra)
```

# Table next to plot
<div class = "row">
<div class = "col-md-6">
```{r echo=FALSE}
kable(head(iris)) %>%
  kable_styling(bootstrap_options = "striped", full_width = FALSE, position="left")
```
</div>

<div class = "col-md-6">
```{r echo=FALSE}
ggplot(iris, aes(x = Sepal.Length, y = Sepal.Width)) + geom_point()
```
</div>
</div>