如何通过rmarkdown将networkD3::sankeyNetwork()自动保存到静态镜像中？

install.packages("rmarkdown")
install.packages("networkD3")

rmarkdown::draft("sankey_network.Rmd", template = "default", package = "rmarkdown")

---
title: "Sankey Network"
output:
  html_document:
    self_contained: false
---

```{r}
library(networkD3)

# 生成sankeyNetwork图表
sankeyNetwork(Links = links, Nodes = nodes, Source = "source", Target = "target", Value = "value", NodeID = "nodeID", units = "TWh", fontSize = 12, nodeWidth = 30)

```{r, echo=FALSE, fig.cap="Sankey Network", out.width="800px"}
library(networkD3)

# 生成sankeyNetwork图表
sankeyNetwork(Links = links, Nodes = nodes, Source = "source", Target = "target", Value = "value", NodeID = "nodeID", units = "TWh", fontSize = 12, nodeWidth = 30)

5. 最后，使用以下命令将R Markdown文档转换为静态镜像（例如HTML文件）：

```R
rmarkdown::render("sankey_network.Rmd")