coef.wald: Extract coefficients from Wald object

In gmonette/spida15: Collection of miscellaneous functions for mixed models etc. prepared for SPIDA 2009+ (development version)

Usage

coef.wald(obj, se = FALSE)

Arguments

obj
se

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (obj, se = FALSE) 
{
    if (length(obj) == 1) {
        ret <- ret <- obj[[1]]$coef
        if (is.logical(se) && (se == TRUE)) {
            ret <- cbind(coef = ret, se = obj[[1]]$se)
        }
        else if (se > 0) {
            ret <- cbind(coef = ret, coefp = ret + se * obj[[1]]$se, 
                coefm = ret - se * obj[[1]]$se)
            attr(ret, "factor") <- se
        }
    }
    else ret <- sapply(obj, coef.wald)
    ret
  }

gmonette/spida15 documentation built on May 17, 2019, 7:26 a.m.