R/plot.r

In eunices/brve: Binary Regression Varying Effort Modelling

#' Plot plots for checking assumptions of BRVE model
#'
#' @param x 
#' @param which 
#' @param col 
#'
#' @return
#' @export
#'
#' @examples
plot.brve <- function (object, 
					             which = c(1, 2, 3, 4, 5), 
					             col = "blue",
					             ...) {

  classes <- class(object)
  classes <- classes[classes != "brve"]
  class(object) <- classes
  
	# plot the model
	plot(object, which = which, col = col)

}