r - RStudio 查看器 Pane 中的两个 dygraph

Question

是否可以同时查看两个 dygraph s 在 RStudio 查看器 Pane 中？

我正在更新一个旧函数，它生成两个时间序列图(使用 ggplot2)，一个叠放在另一个上面(使用 gridExtra::grid.arrange(ggp1, ggp2))。我想用酷dygraph并且更改非常简单，...，除了我想在 RStudio 查看器 Pane 中同时查看两个图。

可以一次查看一个图。确实，"If you call dygraph within RStudio then it’s output appears within the Viewer pane" .但是我找不到同时显示两个图的技巧。我想要那个，因为我想使用方便的 synchronization dygraph 的特点

为了一个可重复的例子，这里有一个我正在做的例子。

library(dygraphs)   
dygraph(mdeaths, group = "ensync")
dygraph(fdeaths, group = "ensync")

但是每一个都是 R 控制台中的一个新调用，然后第一个图显示在查看器上，第二个图立即替换它。

我发现的唯一解决方法是将它放在 RMarkdown 文档中并全部编织。但我有点不喜欢这种方法。我直接在 RStudio 查看器 Pane 中显示它会更方便。

有任何想法吗？

Answer 1

使用 htmltools包，插两个dygraph s 在 tagList并使用 browsable()在查看器中绘制两个图形的函数:

library(dygraphs)
library(htmltools)

browsable(
  tagList(
    dygraph(mdeaths, group = "ensync", height = 200, width = "100%"),
    dygraph(fdeaths, group = "ensync", height = 200, width = "100%")
    )
  )

也许使用 magrittr 代码更易读正向管道操作符:

library(dygraphs)
library(htmltools)
library(magrittr)

dygraph(mdeaths, group = "ensync", height = 200, width = "100%") %>%
  tagList(dygraph(fdeaths, group = "ensync", height = 200, width = "100%")) %>%
  browsable()