通过给定变量查找条件的第一个匹配项

我有资料

library(data.table); set.seed(42)
dat <- data.table(id=c(1,1,1,2,2,3,3,3,3,3,4,5,5,5,5), x=rnorm(15))
> dat
#    id           x
# 1:  1  1.37095845
# 2:  1 -0.56469817
# 3:  1  0.36312841
# 4:  2  0.63286260
# 5:  2  0.40426832
# 6:  3 -0.10612452
# 7:  3  1.51152200
# 8:  3 -0.09465904
# 9:  3  2.01842371
#10:  3 -0.06271410
#11:  4  1.30486965
#12:  5  2.28664539
#13:  5 -1.38886070
#14:  5 -0.27878877
#15:  5 -0.13332134

我想为每个获得id满足的某些条件的第一个值的索引x。例如，对于条件x>0，这将给

> res
#[1]  1  4  7 11 12

我希望data.table可以使用它，因为它的效率一直令我惊讶，但是其他一些可以快速执行此操作的功能也可以工作。