R/rselect.R

rselect=function(...){
  args <- as.list(match.call())
  vars <- args[2:length(args)]
  query <- str_c("SELECT",
                 str_c(str_c(" ?",vars),collapse=""))
  return(query)
}
lvaudor/wikiquery documentation built on May 13, 2019, 11:55 p.m.