1

我想创建一个具有多个面板的单个图形，其中每个面板都包含一个 qgraph 网络图。

理想情况下，我会这样做：

pacman::p_load(qgraph)

# Load big5 dataset:
data(big5)
data(big5groups)

# Correlations:
Q <- qgraph(cor(big5), minimum = 0.25, cut = 0.4, vsize = 1.5, groups = big5groups, 
            legend = TRUE, borders = FALSE)
title("Big 5 correlations", line = 2.5)

# Same graph with spring layout:
Q2 <- qgraph(Q, layout = "spring")
title("Big 5 correlations spring", line = 2.5)

cowplot::plot_grid(Q, Q2)

但这不起作用，因为 cowplot 不知道如何将 qgraph 对象转换为 grobs。

我已经尝试将 qgraph 对象转换为 igraph 对象，我认为我应该能够进一步将其转换为 grobs，也许使用 tidygraph、ggraph、GGally、ggnetwork 或类似的，但我想传达的一些信息已经丢失了方式，我已经按照我想要的方式使用 qgraph 绘制了我的网络。

qgraph 中似乎以前有一个实验as.ggraph功能可能有所帮助，但似乎不再存在。

我的问题是：有什么方法可以简单地将 qgraph 对象转换为 grobs，或者以其他方式生成具有多个 qgraph 对象彼此相邻的图像？

4

0 回答 0