r - 将集群合并到最低的集群

Question

我希望我要问的问题很简单，而我的 google foo 很差。

使用 sf 包中的 st_intersects 我有一个每个点及其相交点的表。

我正在尝试按照以下示例将这些连接在一起。我缺少什么基本功能？我可以用循环来做到这一点，但它似乎效率低下。

**Example:** 

df <- data.frame(
  Source = c(1,1,2,2,2,3),
  Match = c(1,2,2,1,4,3),
  stringsAsFactors = FALSE)

print(df)

  Source Match
    1     1
    1     2
    2     2
    2     1
    2     4
    3     3


**Desired output:**

  Source Match
     1     1
     1     2
     1     4
     3     3

因为匹配 2 在源 1 和源 2 中，所以源 2 中的每个匹配都已移动到源 1。

标签： r