Revision b10307613a7bc4d85a17dfbf2c41e0935f6eb0fb authored by Doug Nychka on 20 November 2004, 17:32:00 UTC, committed by cran-robot on 20 November 2004, 17:32:00 UTC
1 parent 2a4b5cf
Raw File
bplot.R
"bplot" <-
function (x, by,style = "tukey", outlier = TRUE, plot = TRUE, ...) 
{
    obj <- stats.bplot(x, style = style, outlier = outlier, by=by)
    if (plot) {
        bplot.obj(obj, ...)
    }
    else {
        return(obj)
    }
    invisible()
}
back to top