下载并打开zipfile

Question

我想下载包含2个文件的以下zip文件夹并打开它来操作数据。目前我只知道如何手动下载它。

https://d396qusza40orc.cloudfront.net/exdata%2Fdata%2FNEI_data.zip

我还想下载以下zip文件夹，其中包含一系列嵌套文件夹，其中包含我有兴趣下载操作的数据。目前我只是手动下载它们：

https://d396qusza40orc.cloudfront.net/getdata%2Fprojectfiles%2FUCI%20HAR%20Dataset.zip

任何人都可以建议我如何通过R编码来实现吗？

Answer 1

这是一种方法：

fn <- "https://d396qusza40orc.cloudfront.net/exdata%2Fdata%2FNEI_data.zip"
download.file(fn, tf <- tempfile(fileext = ".zip"))
unzip(tf, exdir = td <- file.path(tempdir(), "myzip"))
(list.files(td, full.names = TRUE, recursive = TRUE))