data(gmm_body, data_body)
aic_1 <- AIC(gmm_body, data_body)
aic_2 <- AIC(gmm_body, data_body, y = "WAIST")
data(gmbn_body, data_body)
aic_3 <- AIC(gmbn_body, data_body)
data(gmdbn_air, data_air)
aic_4 <- AIC(gmdbn_air, data_air, col_seq = "DATE")
Run the code above in your browser using DataLab