R/extractSingletonNumericDataFromList.R

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

#' Extract singletion numeric data from a named list to produce a data frame
#' @param lst A list we wish to process
#' @export

extractSingletonNumericDataFromList <- function(lst) {
  out <- matrix(nrow = length(lst), ncol = 2)
  for(i in 1:length(lst)){
    out[i,2] <- lst[[i]]
  }
  out[,1]<- names(lst)
  return(as.data.frame(out))
}