R/select_col.R

In manymodelr: Build and Tune Several Models

#' A convenient selector gadget
#' @param df The data set from which to select a column
#' @param ... columns to select, no quotes
#' @return Returns a dataframe with selected columns
#' @details A friendly way to select a column or several columns. Mainly for non-pipe usage
#' It is recommended to use known select functions to do pipe manipulations. Otherwise convert to tibble
#' @export
#'
#' @examples
#' select_col(yields,height,weight,normal)
#' # A pipe friendly example
#' \dontrun{
#' library(dplyr)
#' as_tibble(yields) %>%
#' select_col(height, weight, normal)
#' }
select_col<-function(df,...){
  UseMethod("select_col")
}
#' @export
select_col<-function(df,...){
select_columns<-unlist(sapply(substitute(...()), deparse))
df[select_columns]
}