如何在要在R中调用的对象中存储森林图？

install.packages("igraph")
library(igraph)

# 创建一个空的图对象
forest <- graph()

# 添加顶点
forest <- add_vertices(forest, n = 5)

# 添加边，构建森林图的结构
forest <- add_edges(forest, c(1, 2, 2, 3, 3, 4, 4, 5))

# 可以通过plot函数来可视化森林图
plot(forest)

# 创建一个列表对象
forest_data <- list()

# 存储森林图对象
forest_data$graph <- forest

# 存储其他属性
forest_data$attribute1 <- "value1"
forest_data$attribute2 <- "value2"

# 可以通过访问列表的方式获取存储的森林图对象
graph <- forest_data$graph

# 可以通过plot函数来可视化存储的森林图对象
plot(graph)