如何在 R(网络工具)中绘制多个数据(桥对象)
How to plot multiple data (bridge-objects) in R (networktools)
我在 R (https://cran.r-project.org/web/packages/networktools/networktools.pdf) 中使用包“networktools”。我创建了三个“桥梁”对象:DataT5_SDQ_network_b、DataT6_SDQ_network_b 和 DataT7_SDQ_network_b。
我已经使用以下代码成功绘制了一个“桥梁”对象:
plot(DataT7_SDQ_network_b, include=c("Bridge Expected Influence (1-step)"), theme_bw=FALSE, zscore=TRUE)
问:如何在同一图中绘制所有三个“桥”对象(带有图例)?
我认为在 networktools
中没有办法做到这一点,但由于绘图是通用的 returns 一个 ggplot
对象,我们可以收集多个绘图并将它们与像这样的传说:
p <- lapply(list(DataT5_SDQ_network_b,
DataT6_SDQ_network_b,
DataT7_SDQ_network_b), function(x) suppressWarnings(plot(x)))
p <- Map(function(a, b) { a$data$Class <- b; a}, a = p, b = c("T5", "T6", "T7"))
p[[1]]$data <- do.call(rbind, lapply(p, function(x) x$data))
p <- p[[1]] + aes(color = Class, group = Class)
p
我在 R (https://cran.r-project.org/web/packages/networktools/networktools.pdf) 中使用包“networktools”。我创建了三个“桥梁”对象:DataT5_SDQ_network_b、DataT6_SDQ_network_b 和 DataT7_SDQ_network_b。
我已经使用以下代码成功绘制了一个“桥梁”对象:
plot(DataT7_SDQ_network_b, include=c("Bridge Expected Influence (1-step)"), theme_bw=FALSE, zscore=TRUE)
问:如何在同一图中绘制所有三个“桥”对象(带有图例)?
我认为在 networktools
中没有办法做到这一点,但由于绘图是通用的 returns 一个 ggplot
对象,我们可以收集多个绘图并将它们与像这样的传说:
p <- lapply(list(DataT5_SDQ_network_b,
DataT6_SDQ_network_b,
DataT7_SDQ_network_b), function(x) suppressWarnings(plot(x)))
p <- Map(function(a, b) { a$data$Class <- b; a}, a = p, b = c("T5", "T6", "T7"))
p[[1]]$data <- do.call(rbind, lapply(p, function(x) x$data))
p <- p[[1]] + aes(color = Class, group = Class)
p