R/create_list_from_collection_of_tables_in_memory.R

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

#' Take all tabular data and make each datum a list member
#' 
#' This function doesn't take any inputs. Just call it. 
#' 
#' @export


create_list_from_collection_of_tables_in_memory = function(){
  o = list()
  nam = c()
  objs = ls(envir=.GlobalEnv)
  for(i in 1:length(objs)){
    Obj_i = get(objs[i])
    if( is.data.frame(Obj_i) | is.matrix(Obj_i) ){
      o = lappend(o,Obj_i)
      nam = c(nam,objs[i])
    }
  }
  names(o) = nam
  o
}