if (FALSE) {
# Create registry with metadata
auth <- person("Jane", "Smith", email = "jane@example.com",
comment = c(ORCID = "0000-0000-0000-0000"))
reg <- bf_registry(name = "analysis",
description = "Data quality assessment",
template = bf_tbl,
author = auth)
# Export to different formats
bf_export(registry = reg, format = "json", file = "metadata.json")
bf_export(registry = reg, format = "xml", file = "metadata.xml")
yaml_output <- bf_export(registry = reg, format = "yaml")
}
Run the code above in your browser using DataLab