R/fmodel2pl.R

fmodel2pl <-
function(zeta, y, apar, bpar, prior = dnorm, ...) {
  m <- length(bpar)
  return(fmodel4pl(zeta, y, apar = apar, bpar = bpar,
    cpar = rep(0,m), dpar = rep(1,m), prior = prior, ...))
}

Try the ltbayes package in your browser

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

ltbayes documentation built on May 2, 2019, 12:40 p.m.