R/get_names_from_list.R

#' @export

get_names_from_list <- function (ls, except = "Freq") {
  x <- plyr::llply(ls, function (x) {
    plyr::llply(x, names)
  })
  setdiff(unique(unlist(x)), except)
}
devincaughey/estsubpop documentation built on June 11, 2019, 1:31 p.m.