R语言 gzfile不解压直接读取压缩文本

R语言是常用的数据处理语言，对于读取文本文件，很多时候如果对文本进行压缩，会节省很多空间，那么对于压缩的文本文件，能够直接在R中不解压，而直接读取其中的文本呢？

R的基础包中就有专门处理这些的命令，包括函数 gzfile，bzfile，xzfile和unz等，能够处理常见的gzip、bgzip、bgzip2，zip等压缩格式的文本。

#实例文件
a = data.frame(x = 1:10, y = paste("n", 1:10, sep ="") )
#将a写入文件中
write.table(a, file = "test.txt", row.names = F)
#压缩文件
system("gzip test.txt")
#读取压缩文件
a1 = read.table( gzfile("test.txt.gz"), header = T)