R语言代码解释：计算子图网络特征

该代码用于计算多个子图的一些网络特征，并将结果储存在向量中。具体解释如下：

• 'for(i in 1:length(sub_graph))'：for循环遍历每个子图，'length(sub_graph)'表示子图的数量。
• 'sample_name <- c(sample_name, names(sub_graph[i]))'：将每个子图的名称添加到'sample_name'向量中。
• 'nodes_num <- c(nodes_num, length(V(sub_graph[[i]])))'：计算每个子图的节点数量，并将结果添加到'nodes_num'向量中。
• 'degree <- c(degree, mean(degree(sub_graph[[i]])))'：计算每个子图的平均度，并将结果添加到'degree'向量中。
• 'average_path_length <- c(average_path_length, average.path.length(sub_graph[[i]], directed = FALSE))'：计算每个子图的平均路径长度，并将结果添加到'average_path_length'向量中。
• 'betweenness_centralization <- c(betweenness_centralization, centralization.betweenness(sub_graph[[i]])$centralization)'：计算每个子图的介数中心性，并将结果添加到'betweenness_centralization'向量中。

最终，这些向量中的结果可以用于比较和分析多个子图的网络特征。