# First create empty folder
dir.create(file.path(getwd(),"temp"))
setwd(file.path(getwd(),"temp"))
df1 <- querxc("Phaethornis anthophilus", download = FALSE)
View(df1)
#downloading files
querxc("Phaethornis anthophilus", download = TRUE)
#check this folder!!
getwd()
# remove example directory
unlink(getwd(),recursive = TRUE)
Run the code above in your browser using DataLab