[英]Apply subset function to a list of dataframes
我有一个SpatialPolygonDataFrame
列表,我可以将其同化为这样的dataframe
SpatialPolygonDataFrame
:
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
是我要查找的结果):
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
功能,但不知道如何使用?
这应该有效:
lapply(list.df, function(x)x[x$B!=2,])
或与subset
:
lapply(list.df, subset, B!=2)
如果只想对一列进行子集化,也可以使用“[[”函数
example_list <- list(iris, iris, iris)
lapply(example_list, "[[", "Species")
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.