R/label_ids.R

Defines functions label_ids

label_ids <- function(labels) {

  nms <- names(labels)
  if (is.null(nms)) {
    return(rep("", length(labels)))
  }

  nms[is.na(nms)] <- ""
  nms
}
timelyportfolio/sortableR documentation built on April 5, 2024, 9:21 a.m.