R/summary.R

In anthonypileggi/api:

#' Take some numbers, return
#'
#' @param vals vector of numbers
#'
#' @return The prediction
#' @import clickstream
#' @export
summary <- function(vals) {

  list(
    mean = mean(vals),
    sd = sd(vals),
    min = min(vals),
    max = max(vals)
  )

}