rasch.ds: Rasch ds

In gvdovandzung/thongke: What the package does (short line)

Usage

rasch.ds(rs, axis = 8, scale = 0.5, param = "theta", jitter = F)

Arguments

rs
axis
scale
param
jitter

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (rs, axis = 8, scale = 0.5, param = "theta", jitter = F) 
{
    rs[, param] <- round(rs[, param] * axis)/axis
    rs <- rs[order(rs[, param]), ]
    t3 <- tapply(rs[, param], rs[, param], length)
    f1 <- NULL
    for (i in 1:length(t3)) {
        f1 <- c(f1, seq(1, t3[i]) + runif(1) * jitter)
    }
    rs$f1 <- (-f1 * scale)
    rs$param <- rs[, param]
    rownames(rs) <- rownames(rs)
    return(rs[, c("param", "f1")])
  }

gvdovandzung/thongke documentation built on May 23, 2020, 12:35 a.m.