R-所有列中条件下数据帧的子集行

# create your data
a <- c(1,2,3,4,5,0,7)
b <- c(8,0,10,11,0,14,14)
c <- c(15,16,17,18,19,20,21)
data <- cbind(a, b, c)

# filter out rows where there is at least one 0
data[apply(data, 1, min) > 0,]

使用 rowSums 匹配后的函数 0 .

# creating your data
data <- data.frame(a = c(1,2,3,4,5,0,7), 
                   b = c(8,0,10,11,0,14,14), 
                   c = c(15,16,17,18,19,20,21))

# Selecting rows containing no 0.
data[which(rowSums(as.matrix(data)==0) == 0),]

另一种方式

data[-unique(row(data)[grep("^0$", unlist(data))]),]