# Generate example data
language_test <- data.frame(
Before = rnorm(100, mean = 50, sd = 10),
After = rnorm(100, mean = 55, sd = 10)
)
mee_chua <- replicate_data(0, 1, "Before", "After", data = language_test)
mee_chua <- mee_chua[order(mee_chua$mu), ] # Sortieren nach 'mu'
# Regression ausführen und Ergebnisse erhalten
reg_results <- meechua_reg(mee_chua)
# Zugriff auf Ergebnisse
mod_coef <- reg_results$mod_coef
se_after <- reg_results$se_after
# mod_coef and se_after are stored in the environment.
plot_mu(mod_coef, 8, se_after)
Run the code above in your browser using DataLab