预测矩阵中R的函数

Question

所以，我有2个数据集，培训和测试。训练数据集是926x9矩阵。前8列表示特征向量x，最后一列表示单值输出y。测试数据集103x8矩阵。我希望对它进行线性回归。

trainData <- read.table("./traindata.txt")
X <- as.matrix(trainData[,1:8])
Y <- as.matrix(trainData[,9])
relation <- lm(Y~X)
testData <- read.table("./testinputs.txt")
testX <- as.matrix(testData[,1:8])
testOutputForY <- predict(relation, newdata = data.frame(X = testX))

我收到的警告信息是＆＃39; newdata＆＃39;有103行但找到的变量有926行。我不确定需要做哪些更改才能使其正常工作enter code here