我想知道我是否错过了一个更快的方法来做以下事情,除了做一个费力的循环 .
说我有这样的矩阵:
m1
c("AK", "JW", "SZ"), c("AK", "JW", "SZ")))
#m1
# AK JW SZ
# AK 0 1 1
# JW 2 0 1
# SZ 2 1 0
现在,我想添加以下数据帧中的值 . 在这里,您可以看到'id1'和'id2'中列出的个体以及要添加'val'的值 .
dfx
"JW"), val = c(1.5, 2.5, 1)), .Names = c("id1", "id2", "val"), row.names = c(NA,
-3L), class = "data.frame")
#dfx
# id1 id2 val
#1 JW AK 1.5
#2 SZ AK 2.5
#3 SZ JW 1.0
应将每个值添加到矩阵的相应单元格中,例如,应将2.5添加到 m1[SZ, AK] . 但是,应该在转置的单元格中添加相同的值,即2.5也应添加到 m1[AK, SZ] .
生成的矩阵应如下所示:
# AK JW SZ
#AK 0.0 2.5 3.5
#JW 3.5 0.0 2.0
#SZ 4.5 2.0 0.0
这可以通过创建一个循环来实现,该循环基本上为'dfx'的每一行执行此操作:
m1[rownames(m1)=="JW",rownames(m1)=="AK"]
m1[rownames(m1)=="AK",rownames(m1)=="JW"]
任何更好的方式的想法/指针赞赏: