我正在从使用基本身份验证的网站下载zip文件。下载似乎没问题,但是当我尝试解压缩文件时,结果是空的。当我手动下载文件时,它有几个文件夹和文件。
这就是我在做的事情:
library(httr)
dest <- paste0(getwd(), "/data/weekly_2017-02-18.zip")
GET("https://www.example.com/weeklydata/weekly_2017-02-18.zip",
authenticate("myemail", "mypassword", "basic"),
write_disk(dest, overwrite = TRUE))
unzip(dest) # <-- THIS FAILS
我做错了什么?
答案 0 :(得分:0)
unzip(dest))&lt; - 这里有一个额外的结束括号
使用:
unzipped&lt; - unzip(dest)