R/list1.R

In do: Data Operator

Defines functions list1

Documented in list1

#' Select list one
#'
#' @param x list
#'
#' @return element in list 1
#' @export
#'
#' @examples
#' x = list(mtcars)
#' x  |> list1()
list1 <- function(x){
    x[[1]]
}

Try the do package in your browser