R语言学习备忘(2)-网络中有重复边

症状：

> testdata <- read.table("zhang_sns.txt") #读取txt内容到数据框
> testmatrix <- as.matrix(testdata) #将数据框转换为矩阵
> zhangnet <- network(testmatrix,directed=T) #将矩阵转换为网络
错误于if (max(abs(x - as.integer(x))[, 1:2]) == 0 && min(x[, 1:2]) >  : 
  需要TRUE/FALSE值的地方不可以用缺少值
此外: 警告信息：
In which.matrix.type(x) : 强制改变过程中产生了NA

原因：网络中有重复的边

解决：可能不是最便捷的方式，正好知道pajek有现成的功能，就用它了。将网络导入Pajek软件，选择net-> transform-> remove-> multiple lines -> single line,导出网络。将edge数据复制出来重新写入一个txt文档。再次尝试上述代码，成功。