r - 如何概括 union() 以接受 N 个参数？

Question

如何将数据附加/推送到 union动态？

例如，我有 4 个数据集要合并，

mydata <- union(data1, data2, data3, data4)

但有时我有不到 4 个，有时则更多。

任何想法如何解决这个问题？

Answer 1

制作一些可重现的数据:

#dummy data
data1 <- data.frame(x=letters[1:3])
data2 <- data.frame(x=letters[2:4])
data3 <- data.frame(x=letters[5:7])

我们可以使用 rbind与 unique在一个字符串中然后评估:

#get list of data frames to merge, update pattern as needed
data_names <- ls()[grepl("data\\d",ls())]
data_names <- paste(data_names,collapse=",")

#make command string
myUnion <- paste0("unique(rbind(",data_names,"))")

#evaluate
eval(parse(text=myUnion))

编辑:

这是另一种更好/更简单的方法，使用 do.call :

unique(do.call("rbind",lapply(objects(pattern="data\\d"),get)))