我正在尝试使用R进行线性回归。以下是我的代码，一切正常，除了最后一行，它给出了以下错误： .Primitive（“％*％”）（x，y）出错： 需要数字/复杂矩阵/向量参数
data<-read.table("tmp.txt",header=TRUE)
X<-data$P
Y<-data$Q
plot(data, pch=16)
model <- lm(Y ~ X , data)
# make a prediction for each X
predY <- predict(model,data)