TABLE OF CONTENTS

splineUtils/frailtysplinefvar [ Functions ]

NAME

    frailtysplinefvar --- compute the spline component frailty variance

FUNCTION

Compute the variance of the frailty density specified by a curve's spline component.

SYNOPSIS

2032 frailtysplinefvar <- function(frailty)

INPUTS

    frailty    an RCurve structure

OUTPUTS

    fvar       variance of the distribution specified by the frailty curve

SOURCE

2035 {
2036     # compute the second moment of the frailty
2037     moment2 = 1 - cevalEinte(frailty$spline.knots, frailty$spline.ord, 2)
2038     moment2 <- drop(moment2)%*%drop(exp(frailty$spline.par))
2039     # normalize
2040     moment2 <- moment2 / sum(exp(frailty$spline.par))
2041     # subtract the mean
2042     fvar <- moment2 - 1
2043     return(fvar)
2044 }