如果满足条件，则打印行，R

我试图找出如何打印逻辑data.frame中包含

TRUE

的行，例如：

数据：

功能（不工作）：

---

我希望对每行应用

TRUE

检查（

MARGIN=1

），然后如果有一个

TRUE

语句，则返回该行。

您不应该直接使用

apply

进行子集设置。您可以使用apply生成一个逻辑向量，然后用于索引。（实际上，您应该避免对data.frames应用，除非所有列都是同一类型的列。）如果确实只有真/假值，则可以对行和进行快速调整。如果已将数据保存在名为

dd

的data.frame中，则可以执行以下操作

dd[ rowSums(dd)>0 , ]

获取至少有一个TRUE的所有行。如果要使用

apply

查找所需行，可以使用

any（）

函数检查至少一个真值

dd[ apply(dd, 1, any), ]

dd[ rowSums(dd)>0 , ]

dd[ apply(dd, 1, any), ]