valueprhr (version 0.1.0)

fit_panel_var: Fit Panel VAR Model

Description

Fits a panel vector autoregression model with first-difference transformation.

Usage

fit_panel_var(panel_data, max_lags = 2L, verbose = TRUE)

Value

A list containing:

model

The fitted panelvar model

best_lag

Selected lag order

bic_values

BIC for each lag order tested

Arguments

panel_data

Data frame in panel format.

max_lags

Maximum lag order to consider. Default 2.

verbose

Logical. Print progress. Default TRUE.

Examples

# \donttest{
if (requireNamespace("panelvar", quietly = TRUE)) {
  set.seed(123)
  panel <- data.frame(
    year = rep(2000:2019, 5),
    sector = rep(LETTERS[1:5], each = 20),
    log_direct = rnorm(100, 5, 0.5),
    log_production = rnorm(100, 5, 0.5)
  )

  result <- fit_panel_var(panel)
  print(result$best_lag)
}
# }