# \donttest{
panel <- UKhouse # load the data
est_multi <- multilevel(panel, ic = "BIC3", standarise = TRUE, r_max = 5,
depvar_header = "dlPrice", i_header = "Region",
j_header = "LPA_Type", t_header = "Date")
bs_fcomp_111 <- BS_local_comp(est_multi, i = 1, j = 1, t = 1)
# }
Run the code above in your browser using DataLab