# Simulate data using the package's included simulation function
sim <- simulate_semipar_data(n_side = 4, t_len = 20, k = 3, rho_error = 0.5)
# Fit the model
fit <- semiparMF(
formula = Y ~ Z,
data_sf = sim$data,
high_freq_data = sim$X_high,
time_col = "time_id",
id_col = "location_id"
)
# Inspect results
summary(fit)
Run the code above in your browser using DataLab