R中不同数据集中函数的自动处理

【问题标题】：automatic processing of function in different datasets in RR中不同数据集中函数的自动处理
【发布时间】：2014-09-12 12:19:54
【问题描述】：

以下函数正在处理数据集 data21

charaFun <- function(col, data=data21) {
    locus<-data[,col]
    mean(locus, na.rm=T)
    }
charaFun("TAPSE")

现在我希望将其应用于其他数据集，例如"data211","data212","data21m1","data21w2" 是 data21 的子集，具体条件。我怎样才能自动实现这一点？

【问题讨论】：

【解决方案1】：

您可以将数据集放在list 中，然后使用lapply 一次性处理所有数据。

 lst1 <- list(data211, data212, dat21m1, data21w2)

或者如果对象名称具有特定模式

 lst1 <- mget(ls(pattern="data\\d+"))


 lapply(lst1, function(x) charaFun("TAPSE", data=x))

【讨论】：