R/as-data-frame.R

In term: Create, Manipulate and Query Parameter Terms

#' @method as.data.frame term_rcrd
#' @export
as.data.frame.term_rcrd <- function(x, ..., stringsAsFactors = FALSE) {
  chk_flag(stringsAsFactors)
  # FIXME: Need stringsAsFactors? Use vctrs::new_data_frame()?
  data.frame(par = field(x, "par"), dim = I(field(x, "dim")), stringsAsFactors = stringsAsFactors)
}