test for a constant term in ex #45

bsvars · Nov 28, 2023 · 00b9510 · 00b9510
1 parent 0cb5186
commit 00b9510
Showing 1 changed file with 9 additions and 0 deletions.
diff --git a/inst/tinytest/test_exogenous.R b/inst/tinytest/test_exogenous.R
@@ -47,3 +47,12 @@ expect_true(
   class(forecast(run_no1, 2, exogenous_forecast = matrix(0, 2, 3))) == "Forecasts",
   info = "Exogenous in forecast."
 )
+
+
+exx = us_fiscal_ex
+exx[,1] = 1
+expect_error(
+  specify_bsvar$new(us_fiscal_lsuw, exogenous = exx),
+  pattern = "constant",
+  info = "Constant term in exogenous."
+)