R中条件赋值

bazzi

我想把矩阵中第二列值等于1的第一列的值赋值给另一个向量，我写了循环，但一直error和warning，有什么办法吗？

passionfruit

把你写的贴上来，我看看

jht0220

不知道理解的对不对


> a <- matrix(c(1, 2, 3, 4, 1, 2, 1, 2), ncol=2)
> a
     [,1] [,2]
[1,]    1    1
[2,]    2    2
[3,]    3    1
[4,]    4    2
> which(a[, 2]==1) 
[1] 1 3
> a[which(a[, 2]==1), 1]
[1] 1 3
>

最后就是矩阵在第二列的值等于1的情况下第一列的值，使用a[which(a[, 2]==1), 1]即可