将nx1矩阵转换为nxn方阵

时间:2014-11-13 21:50:09

标签: r adjacency-matrix

之前我曾问过类似的问题,但与之前的问题相比,这个问题略有不同。

我有一个矩阵

   a  b  c  d  e
a  0  1  1  1  0
b  1  0  1  1  1

我正在尝试将其转换为像这样的方阵

   a  b  c  d  e
a  0  1  1  1  0
b  1  0  1  1  1
c  1  1  0  0  0
d  1  1  0  0  0
e  0  1  0  0  0

有关如何在r中执行此操作的任何建议都会有所帮助。提前谢谢。

1 个答案:

答案 0 :(得分:3)

您对此解决方案有何看法?

res <- (merge(m, t(m)[(nrow(m)+1):ncol(m),], all = TRUE, by = 0:2))[,-1]
rownames(res) <- colnames(res)
res[is.na(res)] <- 0