拟合回归问题 lm

rm(list = ls())
GoogData <- read.table("d:\\Google.csv",header = T,sep=",")
attach(GoogData)
names(GoogData)
Train <- head(GoogData,77)
rGoogex <- GoogData$rGoog_ex
Test <- tail(GoogData,24)
Onefactor <- lm(rGoogex ~ rM_ex, Train)

出现如下问题

Error in model.frame.default(formula = rGoogex ~ rM_ex, data = Train,  :
  variable lengths differ (found for 'rM_ex')

有大侠吗？

error提示变量长度和因变量不同，可以length一下看是不是数目不匹配

变量长度不一样

线性回归模型,提示变量长度不对，需要使用 数据集