library("steward")
library("here")
diamonds_meta <- 
  stw_read_meta_yaml(here("inst", "metadata", "diamonds.yml")) %>%
  stw_mutate_meta(
    n_row = 53940L,
    n_col = 10L    
  ) %>%
  stw_check("all")
usethis::use_data(
  diamonds_meta, 
  overwrite = TRUE
)


ijlyttle/steward documentation built on Jan. 5, 2021, 2:25 p.m.