if (FALSE) {
avs_raw_project <- export_content(content = "project", format = "csv")
avs_raw_metadata <- export_content(content = "metadata", format = "csv")
avs_raw_user <- export_content(content = "user", format = "csv")
avs_raw_record <- export_content(content = "record", format = "csv")
avs_raw_core <- export_core(format = "csv")
}
data(avs_raw_project)
data(avs_raw_user)
data(avs_raw_metadata)
data(avs_raw_record)
data(avs_raw_core)
str(avs_raw_project)
str(avs_raw_user)
str(avs_raw_metadata)
str(avs_raw_record)
str(avs_raw_core)
avs <- format_record(avs_raw_record, avs_raw_metadata)
str(avs)
Run the code above in your browser using DataLab