# NOT RUN {
irtree_create_template(jackson[, c(1, 6, 11)])
#> m1 <- "
#> Equations:
#> 1 = ...
#> 2 = ...
#> 3 = ...
#> 4 = ...
#> 5 = ...
#>
#> IRT:
#> ... BY E1@1, E2@1, E3@1;
#> ... BY E1@1, E2@1, E3@1;
#>
#> Class:
#> Tree
#> "
irtree_create_template(jackson[, c(1, 6, 11)],
cbind(1:5,
m = c(0, 0, 1, 0, 0),
t = c(1, 1, NA, 0, 0),
e = c(1, 0, NA, 0, 1)))
#> m1 <- "
#> Equations:
#> 1 = (1-m)*t*e
#> 2 = (1-m)*t*(1-e)
#> 3 = m
#> 4 = (1-m)*(1-t)*(1-e)
#> 5 = (1-m)*(1-t)*e
#>
#> IRT:
#> m BY E1@1, E2@1, E3@1;
#> t BY E1@1, E2@1, E3@1;
#> e BY E1@1, E2@1, E3@1;
#>
#> Class:
#> Tree
#> "
# }
Run the code above in your browser using DataLab