vcov correction

rjdverse · Sep 15, 2023 · f2f20ac · f2f20ac
1 parent cd544a8
commit f2f20ac
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/regarima_generic.R b/R/regarima_generic.R
@@ -45,9 +45,9 @@ vcov.JD3_REGARIMA_RSLTS <- function(object, component = c("regression", "arima")
     return(NULL)
   component <- match.arg(component)
   if (component == "regression") {
-    object$estimation$parameters$cov
+    object$parameters$cov
   } else {
-    object$estimation$bvar
+    object$bvar
   }
 }
 #' @export