u = "http://www.omegahat.org/RCurl/data.gz"
content = getBinaryURL(u)
if(require(Rcompression)) {
x = gunzip(content)
read.csv(textConnection(x))
} else {
tmp = tempfile()
write(content, file = tmp)
read.csv(gzfile(tmp))
}Run the code above in your browser using DataLab