Download data from web using R

I need to download data from the following website.

I have the following R script but it give me an error.

How can I fix this Error?

Thanks in advance.

rm(list=ls(all=TRUE))

library('purrr')

years <- c(1980:1981)
days <- c(001:002)

walk(years, function(x) {
  map(x, ~sprintf("http://ift.tt/2AvwV6W", years, days)) %>% 
    flatten_chr() -> urls
  download.file(urls, basename(urls), method="libcurl")
}) 


Error:
Error in download.file(urls, basename(urls), method = "libcurl") : 
  download.file(method = "libcurl") is not supported on this platform