对于一个数据帧中的每个观察，计算第二个数据帧中的观察数

Question

我有两个数据框。我想运行第一个观察值的所有观察值，并添加一列，指示第二个数据帧中符合特定条件的观察值数量。

例如：

DF1                               
observation Value              
1            3
2            5
3            8
4            10
5            1

DF2                               
observation Value              
1            8
2            9
3            2
4            1
5            3

我想为 DF1 创建第三列，指示 DF2 中具有（例如）最多大于或小于 2 (|Value2 - Value1|

DF1                               
observation Value  Count              
1            3       3
2            5       1
3            8       2
4            10      2
5            1       3

Answer 1

我们可以遍历'DF1'的'Value'，得到它的绝对差的sum将是'DF2'的'Value'小于或等于2

DF1$Count <- sapply(DF1$Value, function(x) sum(abs(x-DF2$Value) <=2))

---

或者用outer，我们从数据集中得到'Value'列的每个组合的差异，检查绝对值是否小于等于2，找到rowSums

DF1$Count <- rowSums(abs(outer(DF1$Value, DF2$Value, `-`))<=2)
DF1$Count
#[1] 3 1 2 2 3