R/collapse.R

In atusy/cssgrid: Easy CSS Grid Layout For R Markdown And Shiny

#' Collapse character vectors into a string
#'
#' @param ... Vectors to be collapsed
#' @param sep A string as a separator
#'
#' @noRd
collapse <- function(..., sep = " ") {
  x <- c(...)
  if (is.null(x)) return(NULL)
  paste(x, collapse = sep)
}