在 R 中放大 dyGraphs 并将图像保存为 png答案

【问题标题】：Zoom In dyGraphs in R and save image as png在 R 中放大 dyGraphs 并将图像保存为 png
【发布时间】：2019-12-04 22:22:53
【问题描述】：

我想放大 dygraphs 并将图像保存为 png。我已经使用 dygraph 库绘制了图形并将其保存为 png，但它没有放大版本。

library("webshot")
library("htmlwidgets")
lungDeaths <- cbind(ldeaths, mdeaths, fdeaths)
dygraph(lungDeaths, main = "Deaths from Lung Disease (UK)") %>%
  dyHighlight(highlightCircleSize = 5, 
              highlightSeriesBackgroundAlpha = 0.2,
              hideOnMouseOut = FALSE)

saveWidget(ab, "/path/", selfcontained = TRUE, libdir = NULL)

basePng <- paste("images",paste(file,".png"), sep='/')
webshot::webshot("/path/",file=basePng)

但我想要如下图（放大）：

我想为超过 1000 个文件绘制放大的 dygraph。谁能帮我解决这个问题？

【问题讨论】：

为什么不截图？
@MLavoie Screenshot 会起作用，我使用 webshot 将屏幕截图保存为 png。问题，这是我无法在将代码另存为屏幕截图之前放大代码中的情节。
不，我的意思是手动截图？例如在 Mac 上，我认为是 cmd + shift + 4。
@MLavoie，我有大约 4000 个地块，手动保存它们是不可行的。
缩放怎么样？您不会说这对于 4000 个地块是否相同。 webshot有缩放选项。

标签： r zooming dygraphs

【解决方案1】：

我希望这个答案可以帮助任何人，

我使用dyRangeSelector() 在图表上“缩放”，然后使用webshot 保存它。

library(webshot)
library(htmlwidgets)
library(dygraphs)

# webshot::install_phantomjs()

lungDeaths <- cbind(ldeaths, mdeaths, fdeaths)
dygraph(lungDeaths, main = "Deaths from Lung Disease (UK)") %>%
        dyRangeSelector( dateWindow = c("1974-03-1","1974-06-10")) %>%
        dyHighlight(highlightCircleSize = 5, 
              highlightSeriesBackgroundAlpha = 0.2,
              hideOnMouseOut = FALSE)

saveWidget(ab,file ="ab.html", selfcontained = TRUE, libdir = NULL)

webshot(url = "ab.html",file="ab.png")

【讨论】：