Nothing
#' Leverage
#' @importFrom stats hat model.matrix
#' @description Returns the leverage values for a linear regression model.
#' @param x linear regression model given as an \code{\link[stats]{lm}} object.
#' @return A numeric vector of leverage values.
#' @seealso \code{\link[stats]{lm}}, \code{\link[stats:influence.measures]{rstudent()}}, \code{\link[stats:influence.measures]{cooks.distance()}}
#' @examples
#' mod = lm(Framingham$SYSBP1 ~ Framingham$TOTCHOL1 + Framingham$AGE1)
#' leverage(mod)
#' @export
leverage = function(x){
hat(model.matrix(x))
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.