# NOT RUN {
# set up a temporary directory for the example
dwca_cache$cache_path_set(path = "finch", type = "tempdir")
dir <- system.file("examples", "0000154-150116162929234", package = "finch")
# Don't read data in
(x <- dwca_read(dir, read=FALSE))
x$files
x$highmeta
x$dataset_meta[[1]]
x$data
# Read data
(x <- dwca_read(dir, read=TRUE))
head(x$data[[1]])
# Can pass in a zip file
zip <- system.file("examples", "0000154-150116162929234.zip",
package = "finch")
(out <- dwca_read(zip))
out$files
out$highmeta
out$emlmeta
out$dataset_meta
# Can pass in zip file as a url
url <-
"https://github.com/ropensci/finch/blob/master/inst/examples/0000154-150116162929234.zip?raw=true"
(out <- dwca_read(url))
# another url
url <- "http://ipt.jbrj.gov.br/jbrj/archive.do?r=redlist_2013_taxons&v=3.12"
(out <- dwca_read(url))
# }
Run the code above in your browser using DataLab