我有一个如下所示的数据框:
a <- c(1.2,1.19,1.1,1.09,1.09)
b <- c(1.2, 1.18,1.12,1.11, 1.09)
d<- data.frame(a,b)
rownames(d) <- c('450','500','899','1004','1112')
a b
450 1.20 1.20
500 1.19 1.18
899 1.10 1.12
1004 1.09 1.11
1112 1.09 1.09
我想编写一个简短的函数或单行代码,它将返回该行中所有值所在行的行名(在本例中为 a
和 b
) 都小于值1.1
。此条件仅在此数据框的最后一行中满足,行名称为 1112
。请注意,解决方案必须泛化,以便它可以对可能更多的列和具有更多行的数据帧进行操作。
最佳答案
这是获得所需结果的通用矢量化方法:
rownames(d[rowSums(d < 1.1) == ncol(d),])
#[1] "1112"
关于r - 提取行名称,基于一行中的所有元素都小于特定值,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/37816951/