r-Web浏览链接列表

Question

我想浏览一个带有R的链接列表，但遇到了一个错误。这是我的代码

link <- character() 
for (i in 0:9) {
link <- c(link,paste('https://nex-gddp-cmip6.s3-us-west-2.amazonaws.com/NEX-GDDP-CMIP6/ACCESS-CM2/historical/r1i1p1f1/pr/pr_day_ACCESS-CM2_historical_r1i1p1f1_gn_200',i,'.nc', sep = ""))
print(link)
}
browseURL(link)

这是的结果

Error in browseURL(link) : 'url' must be a non-empty character string 

我会感谢你的帮助

Answer 1

从循环中移除c(link,)并将browseURL(link)放入

for (i in 0:9) {
link <- paste('https://nex-gddp-cmip6.s3-us-west-2.amazonaws.com/NEX-GDDP-CMIP6/ACCESS-CM2/historical/r1i1p1f1/pr/pr_day_ACCESS-CM2_historical_r1i1p1f1_gn_200',i,'.nc', sep = "")
browseURL(link)
}

您也可以使用lapply:

lapply(0:9, function(i) {
link <- paste('https://nex-gddp-cmip6.s3-us-west-2.amazonaws.com/NEX-GDDP-CMIP6/ACCESS-CM2/historical/r1i1p1f1/pr/pr_day_ACCESS-CM2_historical_r1i1p1f1_gn_200',i,'.nc', sep = "")
browseURL(link)
})