为了仅针对感兴趣的列过滤data.frame,我需要在此data.frame中查找包含超出特定范围的数据的列。让data.frame为
df<-data.frame(x1=c(1,5,9),x2=c(10,20,30),x3=c(20,100,1000))
ranges<-data.frame(y1=c(3,8),y2=c(10,20), y3=c(15,1250))
作为输出,我想要一个返回名称的列表:“ x1”,“ x2”
我尝试了以下操作,但是只有在“范围”包含下面指定的所有数字时,该代码才有效,并且在找到该数字时才匹配。不幸的是,那不是我所需要的。
ranges<-c(15:300,10:20)
df.l<-colnames(df)[sapply(df,function(x) any(x %in% ranges))]
有什么想法吗?谢谢!
如果'范围'是一个数据框或列表,则一个选项是
names(which(unlist(Map(function(x, y) any(!(x >= y[1] & x <= y[2])), df, ranges))))
#[1] "x1" "x2"
ranges <- data.frame(y1 = c(3, 8), y2 = c(10, 20), y3 = c(15, 1250))