tests/testthat/helper-without_attributes.R

without_attributes <- function(object) {
  attributes(object)[setdiff(names(attributes(object)), c("class", "names", "row.names"))] <- NULL
  object
}
robertzk/RDS2 documentation built on May 27, 2019, 10:33 a.m.