MLRplot:

In musto101/wilcox_R: What the package does (short line)

Usage

MLRplot(x, Y)

Arguments

x
Y

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 (x, Y) 
{
    x <- as.matrix(x)
    out <- lsfit(x, Y)
    cook <- ls.diag(out)$cooks
    n <- dim(x)[1]
    p <- dim(x)[2] + 1
    tem <- cook > min(0.5, (2 * p)/n)
    bhat <- out$coef
    FIT <- bhat[1] + x %*% bhat[-1]
    par(mfrow = c(2, 1))
    plot(FIT, Y)
    abline(0, 1)
    points(FIT[tem], Y[tem], pch = 15)
    identify(FIT, Y)
    title("Forward Response Plot")
    RES <- Y - FIT
    plot(FIT, RES)
    points(FIT[tem], RES[tem], pch = 15)
    identify(FIT, RES)
    title("Residual Plot")
  }

musto101/wilcox_R documentation built on May 23, 2019, 10:52 a.m.