r - 匹配单独的数据框时计算行的平均值

Question

给定一个包含索引和数据列的数据框，如下所示:

AIndex <- c(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15)
AData  <- c(3,5,6,7,3,2,1,2,3,4,5,6,7,8,9)
DF <- data.frame(AIndex,AData)

然后给定第二个数据框，在索引中有一些重叠，如下所示:

BIndex <- c(1,4,8,11,13)
BData  <- c(3,5,7,6,5)
DF2 <- data.frame(BIndex,BData)

我的目标是能够在 A 数据框中找到 A 中的索引和 B 中的索引匹配的位置，然后计算 A + 2 行中该行的平均值。

例如，A 和 B 在 A 中第一次匹配是第 1 行。所以我想在 A (3) 中找到对应的数据点以及接下来的两个数据点(5 和 6)。所以平均值是 4.6

最终结果将是一个新的数据框，如下所示:

Index Data
1     4.6
4      4
8      3
11     6
13     8

Answer 1

有几种方法可以做到这一点。第一步通常涉及查找元素匹配的位置:

mats = match(DF2$BIndex, DF$AIndex)

要找到均值，只需将相关值相加即可

(AData[mats] + AData[mats+1] + AData[mats+2])/3