将行的每个值与向量中的对应值进行比较

Question

我想将 data.frame 中一行的每个值与其在向量中的对应值进行比较。这是一个例子：

df1 <- matrix(c(2,2,4,8,6,9,9,6,4), ncol = 3)
df2 <- c(5,4,6)

> df1
     [,1] [,2] [,3]
[1,]    2    8    9
[2,]    2    6    6
[3,]    4    9    4

> df2
[1] 5 4 6

比较是，如果 df1 的一行中的值小于 df2 中的对应值，那么 row1: 2

> result
     [,1]  [,2]  [,3]
[1,] TRUE FALSE FALSE
[2,] TRUE FALSE FALSE
[3,] TRUE FALSE  TRUE

有什么方法可以在不使用循环的情况下做到这一点？

谢谢小伙伴们！

Answer 1

我们可以做一个比较来创建逻辑矩阵

df1 < df2
#   [,1]  [,2]  [,3]
#[1,] TRUE FALSE FALSE
#[2,] TRUE FALSE FALSE
#[3,] TRUE FALSE  TRUE

之所以起作用，是基于vector的回收。因此，向量“df2”的每个元素，与第一列“df1”进行比较，然后转到第二列，依此类推。

---

如果向量的length不等于第一个数据集的列数，我们可以复制向量

df1 < df2[row(df1)]
#    [,1]  [,2]  [,3]
#[1,] TRUE FALSE FALSE
#[2,] TRUE FALSE FALSE
#[3,] TRUE FALSE  TRUE

或者另一个选项是sweep

sweep(df1, 1, df2, "<")