cell.glh: Confidence ellipse for estimated parameters in Wald test

Usage Arguments Examples

Usage

1
cell.glh(obj, which.coef = 1:2, levels = 0.95, Scheffe = FALSE, dfn = 2, center.pch = 19, center.cex = 1.5, segments = 51, xlab, ylab, las = par("las"), col = palette()[2], lwd = 2, lty = 1, add = FALSE, ...)

Arguments

obj
which.coef
levels
Scheffe
dfn
center.pch
center.cex
segments
xlab
ylab
las
col
lwd
lty
add
...

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
##---- 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, which.coef = 1:2, levels = 0.95, Scheffe = FALSE, 
    dfn = 2, center.pch = 19, center.cex = 1.5, segments = 51, 
    xlab, ylab, las = par("las"), col = palette()[2], lwd = 2, 
    lty = 1, add = FALSE, ...) 
{
    obj <- obj[[1]]
    coef <- obj$coef[which.coef]
    xlab <- if (missing(xlab)) 
        paste(names(coef)[1], "coefficient")
    ylab <- if (missing(ylab)) 
        paste(names(coef)[2], "coefficient")
    dfd <- obj$anova$denDF
    shape <- obj$vcov[which.coef, which.coef]
    ret <- ell(coef, shape, sqrt(dfn * qf(levels, dfn, dfd)))
    colnames(ret) <- c(xlab, ylab)
    ret
  }

gmonette/spida15 documentation built on May 14, 2017, 1:02 p.m.