if (FALSE) {
data(expectation)
out <- gets_nardl_uecm(x = expectation,
decomp = 'food_inf',
dep_var = 'nq_inf_exp',
control = 'nethawkish',
c_q_order = c(3),
p_order = c(3),
q_order = c(3),
gets_pval = 0.1,
graph_save = FALSE,
case = 5,
F_HC = FALSE)
out
}
Run the code above in your browser using DataLab