问如何使用R以编程方式提取/解压缩.7z (7-zip)文件

EN

我正在尝试自动提取一些用7-zip压缩的文件。我需要自动化这个过程，因为a)有很多年的数据我想解锁，b)我想与其他人分享我的代码，防止他们手动重复这个过程。

我的电脑上同时安装了WinRAR和7-zip，我可以用这两个程序中的任何一个单独打开这些文件。

我已经查看了unzip untar和unz命令，但我不相信它们中的任何一个都能满足我的需要。

我对压缩一无所知，但这有什么不同:每个文件都只包含一个文件，而且它只是一个文本文件。

我强烈推荐一种不需要用户安装额外软件(如WinRAR或7-Zip)并使用shell执行命令的解决方案，尽管我承认仅使用R和CRAN包可能无法完成这项任务。实际上，我相信在安装了WinRAR的计算机上使用附加参数在这些文件上运行shell.exec可能会起作用，但同样，如果可能的话，我希望避免这种安装。:)

运行下面的代码将加载我试图解压的文件-- files.data中的.7z文件需要解锁。

# create a temporary file and temporary directory, download the file, extract the file to the temporary directory
tf <- tempfile() ; td <- tempdir()
file.path <- "ftp://ftp.ibge.gov.br/Orcamentos_Familiares/Pesquisa_de_Orcamentos_Familiares_2008_2009/Microdados/Dados.zip"
download.file( file.path , tf , mode = "wb" )
files.data <- unzip( tf , exdir = td )

# how do i unzip ANY of these .7z files?
files.data

谢谢！:)