Given complete dataset objects in Neotoma (must have used
get_datasets() or get_downloads()), return a formatted
citation for the record, including the dataset DOI.
# S4 method for class 'sites'
cite_data(x)data.frame object with citation information.
if (FALSE) { # \dontrun{
# Get datasets metadata from API
ds <- get_datasets(1)
} # }