我正在使用r来解决神经网络问题。这是我的编码：
library(nnet)
set.seed(1)
ann<-nnet(traindata[,1]~traindata[,2]+traindata[,3]+traindata[,4]+traindata[,5]+traindata[,6]+traindata[,7]+traindata[,8],size=10,decay=0.001,maxit=10000)
pred0<-predict(ann,traindata[,1])
pred1<-predict(ann,testdata)
nmse0 <- mean((traindata$RTDP-pred0)^2)/mean((traindata$RTDP-mean(traindata$RTDP))^2)
nmse1 <- mean((traindata$RTDP-pred1)^2)/mean((traindata$RTDP-mean(traindata$RTDP))^2)
但是，它说testdata中的行数与traindata中的行数不匹配，这是什么问题？