R/getMCMCintervals.fnc.R

Defines functions `getMCMCintervals.fnc`

`getMCMCintervals.fnc` <-
function(fixf, mcmcMatrix, m) {
  stop("MCMC sampling is no longer supported by lme4")
  #nfixed = length(fixf)
  #nsamples = nrow(mcmcMatrix)
  #mat = matrix(0, nrow(m), nsamples)
  #for (i in 1:nsamples) {
  #  mat[,i] = m %*% as.numeric(mcmcMatrix[i,1:nfixed])
  #}
  #hpd = as.data.frame(HPDinterval(t(mat)))
  #return(hpd)
}

Try the languageR package in your browser

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

languageR documentation built on May 2, 2019, 10:02 a.m.