Update forecast.R

+ simple changes to accommodate the transposes #27
bsvars · Jul 16, 2024 · c3ea3ff · c3ea3ff
1 parent 690e657
commit c3ea3ff
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/forecast.R b/R/forecast.R
@@ -75,8 +75,8 @@ forecast.PosteriorBSVARSIGN = function(
 
   posterior_Sigma = posterior$posterior$Sigma
   posterior_A     = posterior$posterior$A
-  T               = nrow(posterior$last_draw$data_matrices$X)
-  X_T             = posterior$last_draw$data_matrices$X[T,]
+  T               = ncol(posterior$last_draw$data_matrices$X)
+  X_T             = posterior$last_draw$data_matrices$X[,T]
   Y               = posterior$last_draw$data_matrices$Y
 
   N               = nrow(posterior_Sigma)