search

philchalmers / mirt

Multidimensional item response theory
199 stars 75 forks source link

itemplot function bug? #245

Closed 510myRday closed 8 months ago

510myRday commented 8 months ago 
if(!missing(object) && is.null(theta_lim) && !is.list(object)){
    tmp <- if(is(object, 'MultipleGroupClass') || is(object, 'MixtureClass'))
        object@ParObjects$pars[[1L]]@ParObjects$pars else object@ParObjects$pars
    if(tmp[[extract.mirt(object, 'nitems')+1L]]@dentype == 'custom')
        theta_lim <- object@Internals$theta_lim
    else theta_lim <- c(-6,6)
} else theta_lim <- c(-6,6)

···theta_lim Always equals c(-6,6)···