#' Return the coefficients of a ridgereg object
#' @description \code{coef} returns the coefficients of a ridgereg object.
#' @param object A ridgereg object.
#' @param ... Further arguments passed to or from other methods.
#' @return Return coefficients.
#' @examples
#' coef(ridgereg(formula = Petal.Length ~ Species, data = iris, lambda = 0))
#' @export
# coef
coef.ridgereg <- function(object, ...){
res <- c(object[[4]])
names(res) <- rownames(object[[4]])
return(res)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.