绘图显示在查看器窗格中，而不是显示在绘图窗格中

Question

# install.packages("networkD3")
library("networkD3")

concept <- c("Vulnerability", "Adaptation", "Resilience")

nodes <- data.frame(concept)

source <- c(0, 1, 0)
target <- c(1, 2, 2)
value <- c(76, 48, 42)

links <- data.frame(source, target, value)

my_color <- 'd3.scaleOrdinal() .domain(["Vulnerability", "Adaptation","Resilience"]) .range(["brown", "green" , "blue"])'

sankey_plot<- sankeyNetwork(Links = links, Nodes = nodes, Source = "source",
                   
                   Target = "target", Value = "value", NodeID = "concept", colourScale=my_color, 
                   
                   units = "Indicators", fontSize = 12, 
                   nodeWidth = 30)
sankey_plot

在上面的代码中，我在查看器窗格中获得桑基图。我应该怎么做才能在绘图窗格中显示它？

我正在尝试制作一个简单的桑基图，将其保留在查看器窗格中，而不是在绘图窗格中以 PDF 形式下载。

Answer 1

networkD3 创建 htmlwidgets，而不是绘图，它们本质上是迷你网页，因此它将始终显示在查看器窗格中。如果您想要 PNG，查看器窗格有一个“另存为图像”选项（参见此处）。如果你搜索的话，Stackoverflow 上有很多可以导出为 SVG 的选项，如下所示 https://stackoverflow.com/a/57751023/4389763