如何解决最短路径网络
在计算R中的网络中的最短路径时遇到问题。特别是,我使用以下代码随机化了双模网络:
library(tnet)
n1 <- 441
n2 <- 210
ptie <- nrow(data_network)/(n1*n2)
random_data <- rg_tm(ni=n1,np=n2,ties=ptie,seed = 1000)
random_network = network(random_data,matrix.type="edgelist",directed = TRUE)
但是当我尝试使用以下代码计算最短路径时:
distance_tm(random_network,projection.method="sum")
我遇到以下错误:
Error in if (ncol(net) == 3) { : the argument has lenght zero
有人知道为什么吗?以下实际的两种模式的网络也会发生相同的情况:
structure(list(owner = c("ABBA JEANS MINING Sprl","ABBA JEANS MINING Sprl","ACACIA Sprl","AFRICAN ENGINEERING CORPORATE Sprl","AFRICAN MINERALS (Barbados) Ltd Sprl"),armed_band = c("Mayi Mayi Militia (Bakata Katanga)","Militia (Elements)","Batwa Ethnic Militia","FDD","Militia (Kamwina Nsapu)","RCD-Goma","Anti-Balaka","Kuluna Communal Militia","Mayi Mayi Militia (Bakata Katanga)"),freq = c(1,1,4,1)),row.names = c(NA,-10L),class = c("tbl_df","tbl","data.frame"))
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。