16

我在 R 中有 anx 3 矩阵,并且想要删除最后一列小于 x 的所有行。做这个的最好方式是什么?

4

3 回答 3

16

您也可以使用该subset()功能。

a <- matrix(1:9, nrow=3)  
threshhold <- 8  
subset(a, a[ , 3] < threshhold)  
于 2012-04-21T09:03:32.837 回答
5

与@JeffAllen 相同的方法,但更详细一点,并且可以推广到任何大小的矩阵。

    data <- rbind(c(1,2,3), c(1, 7, 4), c(4,6,7), c(3, 3, 3), c(4, 8, 6))
    data
         [,1] [,2] [,3]
    [1,]    1    2    3
    [2,]    1    7    4
    [3,]    4    6    7
    [4,]    3    3    3
    [5,]    4    8    6
    #
    # set value of x
    x <- 3
    # 
    # return matrix that contains only those rows where value in 
    # the final column is greater than x. 
    # This will scale up to a matrix of any size 
    data[data[,ncol(data)]>x,]
         [,1] [,2] [,3]
    [1,]    1    7    4
    [2,]    4    6    7
    [3,]    4    8    6
于 2012-04-20T19:27:17.507 回答
2
m <- matrix(rnorm(9), ncol=3)
m <- m[m[,3]>0,]

创建一个矩阵,然后重新定义该矩阵以仅包含第三列大于 0 的行 ( m[,3] > 0)。

于 2012-04-20T19:18:07.093 回答