#' Read coefficients for the BAGS classifier
#'
#' Function to read coefficients for the BAGS classifier.
#' @rdname readBAGSCoef
#' @return A matrix with coefficients
#' @examples
#' head(readBAGSCoef())
#' @export
readBAGSCoef <- function() {
file <- system.file("extdata/BAGS/BAGS.coef.rds", package = "hemaClass")
return(readRDS(file))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.