file.down <- tempfile()
file.save <- tempfile()
info.inmet <-
DataMetProcess::list_inmet(year="2000",file.down)
unzip.file <-
utils::unzip(
zipfile = file.down, #or info.inmet$Saved
exdir = file.save
)
unzip.file
Run the code above in your browser using DataLab