Last chance! 50% off unlimited learning
Sale ends in
winsteps(u, codes = c(0, 1), noprint = TRUE, ws.path = "C:/Winsteps/", prefix = paste("wstmp", as.integer(Sys.Date()), sep = ""), peo.mean = 0, item.mean = NULL, scale = 1, peo.anchor = NULL, item.anchor = NULL, out.vars = NULL)
## Not run:
# u <- gen.rsp(gen.irt(200, 20, a.mu=log(.5882), a.sig=0, c.min=0, c.max=0))
# winsteps(u$rsp)
# ## End(Not run)
Run the code above in your browser using DataLab