数据框名称 r 的子集列表

Question

给定一个包含多个 dataframes 数据的主列表 A，名称 A 存储在 Anames 中。我需要 Anames 中的一个子集，我使用 setdiff 函数将其存储在 Cnames 中。

给定 A，我如何使用 Cnames 对 A 进行子集化，将其存储在列表 B 中，然后将 B 中的每个数据帧写入文件如下图？ Anames 和 Cnames 是列向量。

sapply(names(B),function (x)  write.csv(B[[x]],file = paste0(names(B[x]), ".csv"),row.names = FALSE))

Answer 1

我们需要使用intersect来找到'Anames'和'Cnames'

之间的公共元素

B <- A[intersect(Anames, Cnames)
lapply(names(B), function(x) write.csv(B[[x]], 
        paste0(names(B[x]), ".csv"),row.names = FALSE, quote=FALSE))

subset list by dataframe names r