# NOT RUN {
data <- matrix(rnorm(400), ncol = 4)
x <- bvar(data, lags = 2)
# Plot forecasts for all available variables
bv_plot_fcast(x)
# Subset to variables in positions 1, 2 and 4 via position and name
bv_plot_fcast(x, vars = c(1, 2, 4))
# Use the method to plot, adjust confidence bands and orientation
plot(x$fcast, conf_bands = c(0.01, 0.05), orientation = "h")
# }
Run the code above in your browser using DataLab