将子集功能应用于数据框列表 [英] Apply subset function to a list of dataframes

问题描述

我有一个SpatialPolygonDataFrame列表，可以像这样与dataframe同化:

I have a list of SpatialPolygonDataFrame that I can assimilate to dataframe like this:

df.1 <- data.frame(A = c(1:10), B = c(1, 2, 2, 2, 5:10))
df.2 <- data.frame(A = c(1:10), B = c(1, 2, 2, 2, 2, 2, 7:10))
df.3 <- data.frame(A = c(1:10), B = c(1, 2, 2, 4:10))

list.df <- list(df.1, df.2, df.3)

我想根据条件获取每个数据帧的子集的列表(list.df.sub是我要查找的结果):

I would like to get a list of a subset of each dataframe based on condition (list.df.sub is the result I am looking for):

df.1.sub <- subset(df.1, df.1$B != 2)
df.2.sub <- subset(df.2, df.2$B != 2)
df.3.sub <- subset(df.3, df.3$B != 2)

list.df.sub <- list(df.1.sub, df.2.sub, df.3.sub)

我想直接将我的子集应用于list.df.我知道我必须使用lapply函数，但不知道如何?

I would like to apply directly my subset on list.df. I know that I have to use lapply function but don't know how?

推荐答案

这应该有效:

lapply(list.df, function(x)x[x$B!=2,])

或使用subset:

lapply(list.df, subset, B!=2)

这篇关于将子集功能应用于数据框列表的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！