没有匹配的行时按索引删除一行答案

【问题标题】：Delete a row by index when no rows are matched没有匹配的行时按索引删除一行
【发布时间】：2017-07-11 14:09:02
【问题描述】：

我想删除向量k索引的一行矩阵x比如

x = matrix(1:10, 5, 2)
k = rep(1, 5)

# my attempt:
index = which(k == 0)
y = x[-index, ]
#      [,1] [,2]

这里，没有行满足我的删除条件k == 0，所以index 将返回空向量integer(0)。因此，x[-index, ] 将返回一个没有行的矩阵，而不是保留它自己。

我不知道如何处理这个问题，请有人帮我解决这个问题？

【问题讨论】：

标签： r

【解决方案1】：

唯一的复杂因素可能是 k 的大小。否则这应该解决它：给定 x 为：

  x=cbind(c(1,2,3,4,5,6),c(1,2,3,4,5,6))

和

  k=c(1,2,0,1,0,2)

然后

  x[!k==0,]

【讨论】：