R/postvar.R

postvar <-
  function(Kmat,Jmat,Cisqrt){
  ### get posterior variance
  
  pvar <- rowSums((cbind(Kmat,Jmat)%*%Cisqrt)^2)
  
}

Try the bigsplines package in your browser

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

bigsplines documentation built on May 2, 2019, 9:27 a.m.