并排绘制两个 data.tree 个对象

Question

我正在使用 data.tree 包创建一些树。

library(data.tree)
library(DiagrammeR)

acme <- Node$new("Acme Inc.")
accounting <- acme$AddChild("Accounting")
software <- accounting$AddChild("New Software")
standards <- accounting$AddChild("New Accounting Standards")


acme2 <- Node$new("Acme Inc. 2")
accounting2 <- acme2$AddChild("Accounting 2")
software2 <- accounting2$AddChild("New Software 2")
standards2 <- accounting2$AddChild("New Accounting Standards 2")


acme_plot <- plot(acme)
acme_plot2 <- plot(acme2)

我想将这两个图放在一个网格中并排放置。但由于它们不是 ggplot 对象（我无法通过 ggplotify 转换它们），我失败了：

cowplot
par(mfrow)

我也参考了这个答案：但是我的树是通过一个复杂的循环生成的，所以我无法在有向图 boxes_and_circles 调用中生成它们。有什么想法吗？

Answer 1

您可以将包 manipulateWidget 与函数 combineWidgets 一起使用。

如果您希望它们并排放置，可以这样做：

manipulateWidget::combineWidgets(plot(acme), plot(acme2), ncol = 2)

您将无法将对象 acme_plot 或 acme_plot2 放入该函数；您必须输入创建这些对象的调用。

并排绘制两个 data.tree 个对象

Plot two data.tree objects side by side

plot

r

htmlwidgets

data.tree