temp <- tempfile() download.file("https://cran.r-project.org/src/contrib/Rcpp_0.12.15.tar.gz",temp) data <- read.table(unz(temp, "a1.dat")) unlink(temp)