R/access_key.R

Defines functions read_by_key

read_by_key <- function(dict, key) {
  key <- strsplit(key, ".", fixed = TRUE)[[1]]
  Reduce(`[[`, key, init = dict[["translation"]])
}

Try the translated package in your browser

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

translated documentation built on April 25, 2023, 5:09 p.m.