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 25, 2017, 5:24 a.m.