[求助]想用倒数第2条命令替换倒数第3条命令，请问错误如何修改，谢谢！
#问题：求10000以内的整数里，被2~9除后余数分别为：1,0,1,4,3,0,1,0的值

>X=matrix(1:10000,10000,8)   #1~10000备选样本矩阵
>TC=c(1,0,1,4,3,0,1,0)           #目标余数列
>TCT=rep(TC,each=10000)    #目标余数矩阵
>NN=rep(2:9,each=10000)    #除数数列
>NNM=matrix(NN,10000,8)    #除数矩阵
>TCM<-X%%NNM                 #实际余数矩阵
>#TCM                                 #浏览检查TCM实际余数矩阵
>DT=TCM-TCT                      #实际余数矩阵与目标余数矩阵之差
>#DT                                   #浏览检查DT矩阵
>#ZRSD<-X[DT[,1]==0 & DT[,2]==0 & DT[,3]==0 & DT[,4]==0 & DT[,5]==0 & DT[,6]==0 & DT[,7]==0 & DT[,8]==0,] #筛选符合条件的值
>ZRSD<-X[DT[,1:8]==matrix(0,10000,8),] #同上
>ZRSD[,1]                           #返回符合条件的值

Error in X[DT[, 1:8] == matrix(0, 10000, 8), ] :
  (subscript) logical subscript too long