R/select_distinct.R

In patelm9/somersault2:

#' Selects columns and get the distinct values back
#' @import dplyr
#' @export

select_distinct <-
        function(dataframe, ...) {
                vars <- enquos(...)

                dataframe %>%
                        dplyr::select(!!!vars) %>%
                        dplyr::distinct()
        }