Как выровнять объекты Highcharter по горизонтали в статье Distill в R Markdown?

Question

Как бы вы выровняли несколько высокоуровневых объектов рядом друг с другом на веб-сайте Distill в R Markdown? Я пытался

---
title: "Untitled"
output: distill::distill_article
---

```{r, message = FALSE, echo = TRUE}
library(highcharter)
library(dplyr)
data(diamonds, economics_long, mpg, package = "ggplot2")
economics_long2 <- economics_long %>% 
  filter(variable %in% c("pop", "uempmed"))
economics_long3 <- economics_long %>%
  filter(variable %in% c("pop", "unemploy"))

hw_grid(
  hchart(economics_long2, "line", hcaes(x = date, y = value01, group = variable)),
  hchart(economics_long3, "line", hcaes(x = date, y = value01, group = variable)),
  ncol = 2
)
```

В стандартном выводе HTML, т.е. для output: html_document этот код работает хорошо. Однако для статей Distill два высокоуровневых объекта не будут напечатаны рядом друг с другом.

Answer 1

Пока что

, просто добавив fig.show='hold' к чанку, вы увидите, что они сложены, но больше разбросаны. вам может повезти, если вы добавите HTML в Rmarkdown для выравнивания, я попытался использовать out.width="50%" в качестве аргумента чанка, но не повезло