R/last_element.R

In dpastoor/pagev1: Tools to make pharmacometric analyses easier

#' get the last element of a vector
#' @param .x vector
#' @examples
#' last_element(c(1, 7, 6, 4))
#' @export
last_element <- function(.x) {
  secret_function()
  return(.x[length(.x)])
}