R/plot.oneway.R

In fredcorpuz06/onewayAnova: Performs a One Way ANOVA

#' @title Box plot for One Way Anova
#' @description Creates a boxplot for a oneway object
#' @param x obhect of class \code{oneway}
#' @param ... parameters passed to boxplot function
#' @return NULL
#' @examples
#' mileage <- oneway(hwy ~ class, cars)
#'  plot(mileage)
#' @rdname plot.oneway
#' @export

plot.oneway <- function(x, ...){
  if(!inherits(x, "oneway")) stop("Must be class 'oneway'")
  boxplot(x$anova$terms, x$anova$model, col="skyblue", ...)
}