# NOT RUN {
# }
# NOT RUN {
## Download a single site, under CCBY4.0 policy
amf_download_base(user_id = "test",
user_email = "test _at_ mail.com",
site_id = "US-CRT",
data_product = "BASE-BADM",
data_policy = "CCBY4.0",
agree_policy = TRUE,
intended_use = "other",
intended_use_text = "testing download",
out_dir = tempdir())
## Download several sites, under LEGACY data policy
# When finished, return a list of downloaded files
# in your local drive.
file.ls <- amf_download_base(user_id = "test",
user_email = "test _at_ mail.com",
site_id = c("US-CRT", "US-WPT", "US-Oho"),
data_product = "BASE-BADM",
data_policy = "LEGACY",
agree_policy = TRUE,
intended_use = "other",
intended_use_text = "testing download",
out_dir = tempdir())
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab