使用R下载gzip压缩数据文件,提取和导入数据

Question

这个问题的后续内容:如何使用R下载和解压缩gzip压缩文件？例如(来自UCI机器学习库),我有一个保险数据文件.如何使用R下载？

这是数据网址:http://archive.ics.uci.edu/ml/databases/tic/tic.tar.gz.

Answer 1

我喜欢Ramnath的方法,但我会像这样使用临时文件:

tmpdir <- tempdir()

url <- 'http://archive.ics.uci.edu/ml/databases/tic/tic.tar.gz'
file <- basename(url)
download.file(url, file)

untar(file, compressed = 'gzip', exdir = tmpdir )
list.files(tmpdir)

本list.files()应产生是这样的:

[1] "TicDataDescr.txt" "dictionary.txt"   "ticdata2000.txt"  "ticeval2000.txt"  "tictgts2000.txt" 

如果你需要为很多文件自动化这个过程,你可以解析它.

Answer 2

这是一个快速的方法.

# create download directory and set it
.exdir = '~/Desktop/tmp'
dir.create(.exdir)
.file = file.path(.exdir, 'tic.tar.gz')

# download file
url = 'http://archive.ics.uci.edu/ml/databases/tic/tic.tar.gz'
download.file(url, .file)

# untar it
untar(.file, compressed = 'gzip', exdir = path.expand(.exdir))