R/plot.gdina.R

Defines functions plot.gdina

Documented in plot.gdina

## File Name: plot.gdina.R
## File Version: 0.11



plot.gdina <- function( x, ask=FALSE, ... )
{
    probitem <- x$probitem
    I <- max( probitem$itemno )
    for (ii in 1:I){
        pii <- probitem[ probitem$itemno==ii, ]
        graphics::barplot( pii$prob, ylim=c(0,1), xlab="Skill Pattern",
                    names.arg=pii$skillcomb,
                    main=paste0( "Item ", pii[1,"item" ], " (Rule ", x$rule[ii], ")\n",
                            "Attributes ", pii[1,"partype.attr"] ), ask=ask )
    }
}

Try the CDM package in your browser

Any scripts or data that you put into this service are public.

CDM documentation built on Aug. 25, 2022, 5:08 p.m.