tests/testthat/helper-tree-utils.R

tree_chars <- function(t) {
  vals <- as.list(t)
  if(length(vals) == 0L) {
    return("")
  }
  paste0(vapply(vals, as.character, character(1)), collapse = "")
}

Try the Immutables package in your browser

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

Immutables documentation built on April 29, 2026, 1:06 a.m.