将图形对象保存在R中的列表中

Question

我想在列表中保存几个图形对象（igraph），然后使用该列表（例如计算传递性）。以后我想在函数中使用它。

g1<- sample_smallworld(dim=1, 1000, nei=3, p = 0.25)
g2<- sample_smallworld(dim=1, 1000, nei=3, p =0.25)
g3 <- sample_smallworld(dim=1, 1000, nei=3, p =0.25)

g <- c(g1,g2,g3)

length(g1)
length(g)
transitivity(g[1:10])

这就是我得到的：

  

长度（g1）   [1] 10   长（g）   [1] 30   传递性（g [1:10]）   传递性错误（g [1:10]）：不是图形对象

Answer 1

要在r中创建列表，它是list()函数：

library(ggplot2)
n <- 10
df <- data.frame(x = rnorm(n), y = rnorm(n))

g1 <- ggplot(df, aes(x = x, y = y)) + geom_point() + ggtitle("Graph 1")
g2 <- ggplot(df, aes(x = x, y = y)) + geom_point() + ggtitle("Graph 2")
g3 <- ggplot(df, aes(x = x, y = y)) + geom_point() + ggtitle("Graph 3")

g <- list(g1,g2,g3)

g[[1]]
g[[2]]
g[[3]]

igraph对象或多或少是ggplot对象