## see online documentation for full examples
# https://github.com/sdparsons/ICED
# generate data structure and syntax
struc <- data.frame(time = c("T1", "T2", "T3", "T4"),
day = c("day1","day1","day2","day2"),
session = c("ses1", "ses1","ses2", "ses3"))
syn <- iced_syntax(struc)
# generate data
sim1 <- sim_ICED(struc,
variances = list(time = 10,
day = 2,
session = 1,
error = 3),
n = 2000)
res1 <- run_ICED(model = syn,
data = sim1$data)
Run the code above in your browser using DataLab