0

我正在尝试使用以下代码将文件下载到 R 中:

temp<-tempfile()
temp2<-tempfile()
download.file("http://WEBSITENAMEHERE_160828.full.rdb.gz",temp)
gunzip(temp, temp2)

此代码允许下载解压缩文件,但“160828”部分将每 7 天更改一次以更新数据。意思是,在 7 天内,该文件将被称为“160904” R 有没有办法每 7 天自动更改该日期,或者用户必须手动更改它?

谢谢!

4

1 回答 1

2

试试这个

tmp <- as.numeric(gsub(x = seq.Date(from = as.Date("16-08-28"),to = as.Date("16-10-04"),by = "week"),pattern = "-",replacement = ""))
#[1] 160828 160904 160911 160918 160925 161002

它将处理数字部分并使用paste函数来创建完整的下载链接。

paste0("http://WEBSITENAMEHERE_",tmp,".full.rdb.gz")
#[1] "http://WEBSITENAMEHERE_160828.full.rdb.gz"
#[2] "http://WEBSITENAMEHERE_160904.full.rdb.gz"
#[3] "http://WEBSITENAMEHERE_160911.full.rdb.gz"
#[4] "http://WEBSITENAMEHERE_160918.full.rdb.gz"
#[5] "http://WEBSITENAMEHERE_160925.full.rdb.gz"
#[6] "http://WEBSITENAMEHERE_161002.full.rdb.gz"
于 2016-09-01T15:12:49.940 回答