如何在 rmarkdown 中嵌入 highcharter 以共享（不是循环）

Question

我无法在要共享的 Rmarkdown 文件中获得两个简单的 highcharter 图表。它工作正常并在我的 PC 或 Mac 中呈现，但是当我共享文件时，人们只能看到文本。

正如几篇文章中提到的，它们不是循环的一部分。它们只是两个图表。对于可重现的示例，我实际上只是打开了一个新的 rmarkdown 文档并选择了 html。我用 highcharter 代码替换了 "summary table" of cars 。我什至试过 htmltools::tagList(chart1, chart2) 但它不起作用。

我正在提供代码。如果你能告诉我如何用一张图表来做，我可以用第二张图表来做。谢谢。

---
title: "Untitled"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)


```{r echo=FALSE}
library(magrittr)
library(highcharter)
highchart() %>%
    hc_add_series(cars, type = "scatter", hcaes(speed, dist))

如果刻度线隐藏了代码背景，我深表歉意，但是这三个块在每个块的开头和结尾都用三个刻度线包裹着。

再次感谢。

Answer 1

是的，下面的代码生成代码下面的文件。我现在有一个完整的 .html 文件，文件中包含高图。

---
output:
 html_document:
   self_contained: yes
   mode: selfcontained
---

{r echo=FALSE}
library(magrittr)
library(highcharter)
highchart() %>%
hc_add_series(cars, type = "scatter", hcaes(speed, dist))

如何在 rmarkdown 中嵌入 highcharter 以共享（不是循环）

How to embed highcharter in rmarkdown to share (not a loop)

r-markdown

r-highcharter