R语言跨列判断，提取符合条件的行

利用dplyr包里的filter函数
library("dplyr")
data %>% filter_at(vars(c(1:20)),all_vars(.>0)) #提取前20列大于0的所有行
data %>% filter_all(any_vars(. >0)) #提取所有列大于0的所有行

filter_all筛选所有列，filter_at 筛选指定列。
参考：R语言基础入门(2) filter的使用方法从基础到高级 - 简书 (jianshu.com)