我正在创建一个新的 data.table，其中包含至少具有一个负值的所有行。
这是一个简单的可重现数据表：
dt <- data.table(
ID = c(42, 43, 44),
Stage_1 = c(-6, 7, 4),
Stage_2 = c(-15, 4, -8),
Stage_3 = c(-20, 2, -5)
)
# ID Stage_1 Stage_2 Stage_3
# 1: 42 -6 -15 -20 # <~~ row to be selected (> 0 negative values)
# 2: 43 7 4 2
# 3: 44 4 -8 -5 # <~~ row to be selected (> 0 negative values)
我想要的输出是：
dt2 <- data.table(
ID = c(42, 44),
Stage_1 = …