if (FALSE) {
paths <- 'V2 ~ V1
V3 ~ V4lag'
fit <- gimmeSEM(data = simData,
out = "C:/simData_out",
subgroup = TRUE,
paths = paths)
residuals <- residuals.gimme(fit)
residuals <- residuals.gimme(fit, lag = 5)
}
Run the code above in your browser using DataLab