问题如下
有avector
k<-sample(1:100000,1000)
sort(k)->k
然后有一个矩阵,其范围如
l<-c(1,100)
l1<-c(250,1000)
l3<-c(30000,60000)
l4<-c(80000,90000)
rbind(l,l1)->l
rbind(l3,l4)->ll
rbind(l,ll)->ll
ll->l3
现在我必须找到表格范围内的数字(如1-100或30000到60000)。目前我使用
indx <- sapply(k, function(x) any(x >= l3[,1] & x <= l3[,2]))
对于超过60k行的表(l3)来说速度很慢 - 可能有更快的方法吗?