r - 矩阵中至少有 1 个负值的总列数

Question

我想在 100 行和 1000 列的矩阵中找到至少一个负值（也就是至少一个低于零的值）的总列数。请问如何在 Rstudio 中编码？

标签： rmatrixnegative-number

Answer 1

我们可以colSums在逻辑上使用matrix并检查值是否大于 0，得到sum

sum(colSums(m1 < 0) > 0)
#[1] 6

数据

set.seed(24)
m1 <- matrix(sample(-1:15, 10 * 10, replace = TRUE), 10, 10)