y<-list()
for (i in 1:200) {
  B[,14:17]<-data.n.matrix[c(i),]
  y[]<-subset(B,B$X<B$xb & B$X>B$xa & B$Y<B$ya & B$Y>B$yb)
  }


我想要从第一个数据集选第一行，然后与第二个数据集进行比较满足条件的自成一个数据集，然后筛选第二行，选出满足条件的，以此类推，但我的循环语句一直报错