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 }