在R中删除矩阵中含有0的行

在R中删除矩阵中含有0的行

介绍如下三种方法：

#方法一：
A = sapply(1:nrow(A),function(x) if(all(A[x,])!=0) A[x,])
#方法二：
x[!as.logical(rowSums(dat==0)), ]
#方法三：
dat[dat==0] <- NA
na.omit(dat)