我有一个具有相同列的n个文件的列表,我想根据一些条件对它们进行子集,这些条件是在与文件号n相同长度的向量a中“捕获”的。
list_files(file_1, file_2, ..., file_n)
a <- c(1, 2, 3, ....,n).我需要从每个文件中提取满足与每个文件(Column_1)中相同列相关的条件的行,并将它们绑定在一起
rez[1] <- list_file[[1]] %>%
filter(Column_1 == a[1])
rez[2] <- list_file[[2]] %>%
filter(Column_1 == a[2]),
.
.
.我尝试了一个for循环,但是我在结果绑定(rbind(rez1,rez2,))上遇到了麻烦。谢谢
发布于 2021-06-22 19:25:34
使用类似于
dummy_df <- data.frame(Column_1 = 1:26, Column_2 = LETTERS)
list_file <- list(dummy_df, dummy_df, dummy_df)
a <- c(11:13)您可以避免循环,并使用
purrr::map2_dfr(list_file, a, ~ dplyr::filter(.x, Column_1 == .y))返回
Column_1 Column_2
1 11 K
2 12 L
3 13 Mhttps://stackoverflow.com/questions/68082462
复制相似问题