r - 根据两列标记第一次出现

Question

我有两列x和y。我想标记在 x 或 y 中出现的值的第一次出现。

  library(dplyr)
tibble(x = c(1, 2, 2, 3, 7), y = c(7, 7, 8, 9, 10))
#> # A tibble: 5 × 2
#>       x     y
#>   <dbl> <dbl>
#> 1     1     7
#> 2     2     7
#> 3     2     8
#> 4     3     9
#> 5     7    10

^{由 reprex package 于 2021 年 11 月 15 日创建(v0.3.0)}

我的预期输出应如下所示:

#> # A tibble: 5 × 4
#>       x     y first_occurance_x first_occurance_y
#>   <dbl> <dbl>             <dbl>             <dbl>
#> 1     1     7                T                T
#> 2     2     7                T                F
#> 3     2     8                F                T
#> 4     3     9                T                T
#> 5     7    10                F                T

^{由 reprex package 于 2021 年 11 月 15 日创建(v0.3.0)}

Answer 1

cbind(df, t(array(!duplicated(c(t(df))), rev(dim(df)))))

  x  y     1     2
1 1  7  TRUE  TRUE
2 2  7  TRUE FALSE
3 2  8 FALSE  TRUE
4 3  9  TRUE  TRUE
5 7 10 FALSE  TRUE