data("avs_raw_metadata")
data("avs_raw_record")
# Formatting the record can be called in different ways and the same result
# will be generated
identical(
format_record(avs_raw_record, avs_raw_metadata),
format_record(avs_raw_core)
)
avs <- format_record(avs_raw_record, avs_raw_metadata)
avs
Run the code above in your browser using DataLab