需要帮助使用串联操作 URL 来跨越 R 中 2 年的存档数据

Question

我想在 R 中连接以下值。

day <- sprintf("%02d", 1:31)
month <- sprintf("%02d", 1:12)
year <- 2015:as.numeric(format(Sys.time(), "%Y"))

我需要它们采用以下格式 2015/01/01012015 (YYYY/MM/MMDDYYYY)，其中 MM 必须始终相等。
最后我想把它附加到这个 URL http://brocktonpolice.com/wp-content/uploads/ 的末尾，这样我就可以将它作为参数传递给下载函数来下载文件。

这是我目前所拥有的

links <- NULL
i <- 1
while (i <= length(year)) {

links[i] <- paste0("http://brocktonpolice.com/wp-content/uploads/",year[i],     sep = "/")
i = i + 1
}

我希望它跨越 2015 年和 2016 年全年。例如：

http://brocktonpolice.com/wp-content/uploads/2015/01/01012015.pdf  
http://brocktonpolice.com/wp-content/uploads/2015/01/01022015.pdf  
http://brocktonpolice.com/wp-content/uploads/2015/01/01032015.pdf  
http://brocktonpolice.com/wp-content/uploads/2015/01/01042015.pdf  
...  
http://brocktonpolice.com/wp-content/uploads/2015/02/02012015.pdf  
http://brocktonpolice.com/wp-content/uploads/2015/02/02022015.pdf   
http://brocktonpolice.com/wp-content/uploads/2015/02/02032015.pdf 
...    
etc

Answer 1

使用seq.Date。简单多了。

prefix <- "http://brocktonpolice.com/wp-content/uploads/"
AllDays <- seq.Date(from = as.Date('2015-01-01'), to = Sys.Date(), by = "day")
links <- paste0(prefix, format(AllDays, '%Y/%m/%m%d%Y'), '.pdf')
print(links)

需要帮助使用串联操作 URL 来跨越 R 中 2 年的存档数据

Need help manipulating URL using concatenation to span 2 years of archived data in R

url

r

concatenation

web-crawler

web-scraping