R/name_output_list.R

Defines functions name_output_list

name_output_list <- function(ds_list) {
  block_names <- unlist(lapply(ds_list, function(x) x$block_type_name))
  names(ds_list) <- block_names

  return(ds_list)
}

Try the opusreader2 package in your browser

Any scripts or data that you put into this service are public.

opusreader2 documentation built on Feb. 3, 2026, 5:07 p.m.