1

我正在尝试使用 mtsdi 包对 R 中丢失的数据进行插补。我正在尝试比较 3 个模型之间的插补性能-> 样条、arima 和 gam。

splines 方法对我有用，但是当我尝试使用 arima 的相同方法时，它会引发“系统在计算上是奇异的”错误。

我使用的是相同的数据，并且通过将所有 arima 模型指定为 1,0,0，在我的 arima 模型中略有作弊。我打算稍后改变这个。

这可能是错误的原因吗？

这是我的数据的 dput (Imputation_Test)，下面是我用于样条线和 arima 模型的代码。

Imputation_Test <- ts(Imputation_Test,frequency = 96)

variable2bImputed <- ~KD0027U09A3+KD0027U09C3+KD0046U09A3+KD0046U09C3+KD0103U09B3+KD0103U09C3+KD0166U09C3+KD0177U09C3+LX0017U09B3+LX0022U09A3+LX0022U09B3+LX0022U09C3+LX0023U09A3+LX0023U09B3+LX0060U09A3+LX0060U09B3+LX0060U09C3+LX0073U09A3+LX0074U09A3+LX0074U09B3+LX0074U09C3+LX0079U09A3+LX0080U09A3+LX0080U09B3+LX0080U09C3+LX0088U09A3+LX0088U09B3+LX0088U09C3+OF0028U09B3+OF0061U09B3+KD0056U09A3+KK0125U09A3+LX0017U09A3+LX0017U09C3+LX0025U09A3+LX0096U09A3+LX0097U09A3+Modified

imputed.spline <- mnimput(variable2bImputed,
                          Imputation_Test,
                          eps=1e-3,
                          ts=TRUE,
                          method="spline")

arcontrol<-list(order=cbind(c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0),c(1,0,0)), period=NULL)
imputed.arima <- mnimput(variable2bImputed,
                          Imputation_Test,
                          eps=1e-3,
                          ts=TRUE,
                          method="arima",
                       ar.control = arcontrol)
4

0 回答 0