inst/scripts/get_example_metadata.R

In taxonomicallyinformedannotation/tima-r: Taxonomically Informed Metabolite Annotation

start <- Sys.time()

library(tima)

logger::log_trace(
  "This script downloads an example of metadata table."
)
logger::log_trace("Authors: AR")
logger::log_trace("Contributors: ...")

get_file(
  url = get_default_paths()$urls$examples$metadata,
  export = get_default_paths()$data$source$metadata
)

end <- Sys.time()

logger::log_success("Script finished in ", format(end - start))