R/poLCA.updatePrior.R

Defines functions poLCA.updatePrior

#' @noRd
poLCA.updatePrior <- function(b, x, R) {
  b <- matrix(b, ncol = (R - 1))
  exb <- exp(x %*% b)
  p <- cbind(1, exb) / (rowSums(exb) + 1)
  return(p)
}

Try the poLCAParallel package in your browser

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

poLCAParallel documentation built on Feb. 20, 2026, 1:09 a.m.