R/makePaddedDataFrame.R

In msxakk89/dat: Data Analyst Toolkit (dat): a library of tools for data analysts and scientists

#' Make a padded data frame from a list containing vectors as elements of varied lenght
#' 
#' This function was created to amalgamate vectors of varied lenght into a padded data frame, i.e. data frame where ncol equals number of elements, while nrow equals maximum lenght among all the elements of the list. Shorter vectors are "stuffed" with NAs
#' @param l A list whose vecotor elements we wish to amalgamate into padded data frame
#' @return A data frame
#' @export

makePaddedDataFrame <- function(l,...){
  maxlen <- max(sapply(l,length))
  data.frame(lapply(l,na.pad,len=maxlen),...)
}