r - R Studio“另存为图像”为“networkD3”或“Diagrammer”等包裁剪图像

Question

系统详情

RStudio Edition : Desktop
RStudio Version : 1.1.463 
OS Version      : Windows 7 Professional
R Version       : 3.5.1

重现问题的步骤

在 R Studio 中运行以下代码

library(networkD3)
URL <- paste0(
  "https://cdn.rawgit.com/christophergandrud/networkD3/",
  "master/JSONdata/energy.json"
  )
Energy <- jsonlite::fromJSON(URL)
sankeyNetwork(Links = Energy$links, Nodes = Energy$nodes, Source = "source",
              Target = "target", Value = "value", NodeID = "name",
              units = "TWh", fontSize = 12, nodeWidth = 30)

然后在Viewer选项卡上选择Save as Image或Copy to Clipboard并选择 1,000 的宽度和 618 的高度。继续保存和/或复制绘图并注意它被裁剪得很奇怪。这是它的样子。似乎是一个错误。

一种解决方法是先将 html 小部件保存为 html 文件，然后再将webshot其保存为 png 文件。但我不喜欢变通方法。怎么了？

htmlwidgets::saveWidget(m, file="m.html")
webshot::webshot("m.html", "m.png")