R 需要一个函数来在第一行创建一个新变量，然后用新变量替换一个不同的变量(对于多行)

由于每一行都依赖于更改其前一行的结果after，因此我们需要使用Reduce或purrr::reduce进行约简.

我更喜欢使用列表列，因为它提供了更清晰的集合操作，而没有正则表达式的"风险"(诚然，这里没有太多风险).

df %>%
  mutate(
    lineupBefore = strsplit(lineupBefore, "[, ]+"),
    lineupAfter = Reduce(function(prev, rn) c(setdiff(prev, player_out[rn]), player_in[rn]),
                         row_number(), init = lineupBefore[[1]], accumulate=TRUE)[-1], 
    across(starts_with("lineup"), ~ sapply(.x, toString))
  ) %>%
  as.data.frame()
#   sub_num player_out player_in                                     lineupBefore
# 1       1   player_5  player_6 player_1, player_2, player_3, player_4, player_5
# 2       2   player_4  player_7                                               NA
# 3       3   player_3  player_8                                               NA
#                                        lineupAfter
# 1 player_1, player_2, player_3, player_4, player_6
# 2 player_1, player_2, player_3, player_6, player_7
# 3 player_1, player_2, player_6, player_7, player_8

(我在最后添加了as.data.frame，只是为了在控制台渲染上提供完整的字符串，这不是必需的.)

漫游:

• strsplit(.)将字符串转换为列表列，因此现在第一行是c("player_1", "player_2", "player_3", "player_4", "player_5")(向量)，lineupBefore是此类向量的列表;
• Reduce对一个值和一个向量进行"运算"，然后获取结果并对下一个进行运算.由于我们需要对多个列进行操作，因此需要将值作为行号.init=是起始值，在每次调用anon函数时，prev=参数是列表，rn=是行号(使用row_number()提供).
• Reduce的默认行为是只在最后返回结果；因为我们想要所有的临时值，所以我们添加accumulate=TRUE，并且由于结果比row_number()向量多1(第一个元素是init=值，我们不想要它)，所以我们[-1]删除第一个元素.
• 由于内部无名函数执行的是set-op(setdiff和concatenate)，因此顺序并不完全像您所描述的那样，我希望这不是问题.
• 最后，假设您确实更喜欢使用字符串，我将为您将其恢复为字符串；我可能会将其保留为列表列，这样您就可以删除across(.).

同样的事情，但使用stringr::str_replace:

df %>%
  mutate(
    lineupAfter = Reduce(function(prev, rn) stringr::str_replace(prev, player_out[rn], player_in[rn]),
                         row_number(), init = lineupBefore[[1]], accumulate=TRUE)[-1]
  ) %>%
  as.data.frame()
#   sub_num player_out player_in                                     lineupBefore
# 1       1   player_5  player_6 player_1, player_2, player_3, player_4, player_5
# 2       2   player_4  player_7                                             <NA>
# 3       3   player_3  player_8                                             <NA>
#                                        lineupAfter
# 1 player_1, player_2, player_3, player_4, player_6
# 2 player_1, player_2, player_3, player_7, player_6
# 3 player_1, player_2, player_8, player_7, player_6