TABLE OF CONTENTS
MetropolisHastings/mh.coef [ Functions ]
NAME
mh.coef --- MH for regression coefficients
FUNCTION
Metropolis-Hastings step for regression coefficients
SYNOPSIS
2813 mh.coef <- function(hazard, frailty, regression)
INPUTS
hazard RCurve for hazard frailty RCurve for frailty regression RRegression structure
OUTPUTS
regression RRegression with updated coefficients
SOURCE
2816 { 2817 mhout <- mh(regression$coefficients, mklik.coef, regression$candcov, regression$tun, 2818 hazard = hazard, frailty = frailty, regression = regression) 2819 if(mhout$acc) regression <- updateregression(regression, mhout$par) 2820 regression$accept <- mhout$acc 2821 return(regression) 2822 }