我有一个有用信息的数据框:
X = c(1,2,3,4,5,6,7,8,9,10)
Y = c(5,4,3,2,1,0,1,2,3,4)
Z = c(11,12,13,14,15,16,17,18,19,20)
df <- data.frame(X, Y, Z)
行和列位置的数据框:
row <- c(6,2,5)
column <- c(1,2,3)
pos <- data.frame(row, column)
我想使用一些使用fun
中的列和行位置的函数(pos
)来返回占据这些位置的df
中的值,例如
fun(df, pos$row, pos$column)
[1] 6 4 15
我以为我可以这样做,但无济于事
df[c(pos$row),c(pos$col)]
答案 0 :(得分:4)
行/列索引作为matrix
使用,因此我们转换为&#39; pos&#39;到matrix
并将其用作行/列索引以提取值。
df[as.matrix(pos)]
或其他方式,cbind
&#39; pos&#39;的列cbind
的{{1}}返回vector
matrix
这可以转换为函数
df[cbind(pos$row, pos$column)]
答案 1 :(得分:1)
你也可以通过调用sapply
内的函数执行此操作,处理pos
行:
sapply(seq(nrow(pos)), function(i) df[pos$row[i], pos$column[i]])
[1] 6 4 15