R/zzz.R

Defines functions pluck

pluck <- function(x, name, type) {
  if (missing(type)) {
    lapply(x, "[[", name)
  } else {
    vapply(x, "[[", name, FUN.VALUE = type)
  }
}
ropenscilabs/geoops documentation built on Jan. 1, 2021, 4:03 p.m.