R/wrap_strings.R

In rblissett/pubpub: A Package for Simplifying Data Reporting

#' A vector of strings wrapping function
#' 
#' This function applies wrap_sentence to a vector of strings
#' 
#' @param vector_of_strings Vector of strings to be wrapped
#' 
#' @export
wrap_strings <- function(vector_of_strings, ...){
  sapply(vector_of_strings,FUN=function(x) {paste(wrap_sentence(x, ...))})
}