我试图让我的研究可以重现在figshare存储数据
当我在R中下载并解压缩数据时发生了一些奇怪的事
here is the zip
如果我手动下载它,它打开确定;但是当我尝试使用R
脚本获取它时,下载的存档已损坏。任何想法问题在哪里?
重现我的错误的代码
url <- 'https://ndownloader.figshare.com/files/4797355'
path <- 'test/missing_data_raw.zip'
ifelse(file.exists(path1), yes = 'file alredy exists', no = download.file(url1, path1))
unzip(zipfile = path1,exdir = 'test')
答案 0 :(得分:3)
尝试明确地将下载模式设置为二进制:
url <- 'https://ndownloader.figshare.com/files/4797217'
path1 <- tempfile(fileext = ".zip")
if (file.exists(path1)) 'file alredy exists' else download.file(url, path1, mode="wb")
unzip(zipfile = path1,exdir = tempdir())