3.7 Identificando los dominios para realizar estimación del modelo

El código siguiente realiza una serie de operaciones con dos conjuntos de datos: indicador_dam1 y statelevel_predictors_df. En primer lugar, utiliza la función inner_join() de dplyr para unir ambos data.frames por la columna id_orden. Luego, se ordenan las filas por esta misma columna y se eliminan las columnas dam2 e id_orden. Finalmente, se convierte el resultado en una matriz y se asigna a la variable X_obs. En resumen, este código prepara los datos para ser utilizados en un modelo de regresión logística multinomial de área de respuesta.

X_obs <- inner_join(indicador_dam1 %>% select(dam2, id_orden),
                    statelevel_predictors_df) %>%
  arrange(id_orden) %>%
  data.frame() %>%
  select(-dam2, -id_orden)  %>%  as.matrix()