迭代数据帧列表并获取 R 中每个数据帧的子集

Question

我有一个数据框列表 (mylist)，我想遍历它们并从每个数据框中获取特定列中没有某些值的所有行（"upstream" 或 "downstream")!我想 return 数据帧的子集（对于其余值）返回列表！目前我正在这样做：

mylist<- lapply(mylist, function(df){
  if (df$column != "upstream" | "downstream"){
     mylist <- df
  }
})

这给出了以下错误：

Error in df$insideFeature : object of type 'symbol' is not subsettable

提前感谢您提供的任何帮助！

Answer 1

正如 PeterDee 还指出的那样：您使用的 | 不正确。使用%in%做如下

myfun <- function(df, words) {
  good_col <- which(! df$column %in% words)
  df[good_col,]
}

然后

lapply(mylist, myfun, c("upstream", "downstream"))

Iterate over a list of dataframes and get a subset of each dataframe in R