在 R 中解压缩内存中的原始文件

Question

我需要从互联网上下载一个压缩的 csv 文件，解压缩并作为 data.frame 加载到内存中。有没有一种方法可以只在内存中完成整个过程而无需读/写磁盘？这是我尝试过的：

library(RCurl)
file <- getURL(url, userpwd='user:pwd')
tf <- tempfile()
writeBin(content(file, "raw"), tf)
tf <- unzip(tf, exdir=tempdir())
data <- read.csv(tf)
unlink(tf)

我认为writeBin、unzip 和read.csv 这里使用昂贵的磁盘 I/O，但我不知道如何改进。

Answer 1

我认为这个使用 unz() 的示例通过打开与 Zip 存档中单个文件的连接可以让你更接近某个地方，但如果 unz() 函数实际上没有解压缩到磁盘，我会感到惊讶，我没有检查它：

##  Create a sample data.frame object:
d <- data.frame(a=rnorm(40), b=rnorm(40))

##  Write this data.frame to two separate CSV files, and zip
##    them together into a new archive:
write.csv(d, file="d.csv")
write.csv(d, file="d_2.csv")
zip("d.zip", c("d.csv", "d_2.csv"))

##  In this case, we will open a file connection to a single file 
##    inside the zip archive, and read the data in using read.csv():
f <- unz("d.zip", "d_2.csv")
a <- read.csv( f )
head(a)