R/toWeekly.R

In itsaquestion/TPlot: What the Package Does (One Line, Title Case)

Defines functions toWeekly

Documented in toWeekly

#' toWeekly
#'
#' @param x 
#'
#' @return
#' @export
#'
#' @examples
toWeekly = function(x){
  ret = Reduce(cbind,lapply(x,function(y){to.weekly(y)[,4]}))
  names(ret) = names(x)
  ret
}