可变长度错误阻止线性回归建模

Question

我得到了一个包含数据的 .txt 文件，然后由于收集的时间范围，有些数据不可用（前 6 个月的总数，而在第 4 个月不可能）。

我正在尝试拟合线性回归模型，但出现此错误：

Error in (function (formula, data = NULL, subset = NULL, na.action = na.fail,  : 
  variable lengths differ (found for 'AdvExp6')

想要根据 AdvExp6 的前 6 个（数据不可用的那个）对数量 NewPI 进行建模。

这是我的代码：

LegalAdv <- read.table("LegalAdv.txt", header=TRUE)
str(LegalAdv)
head(LegalAdv, 20)
with(LegalAdv, plot(AdvExp6, NewPI, type="p"))
with(LegalAdv, plot(AdvExp6, NewWC, type="p"))

M1 <- lm(NewPI ~ AdvExp6, data=LegalAdv)
with(LegalAdv, plot(NewPI ~ AdvExp6, type="p"))
with(LegalAdv, lines(fitted(M1) ~ AdvExp6))

我期待收到一个模型和拟合回归线，这样我就可以计算系数和其他必要的值。