使用 R 下载 NetCDF 文件：手动工作，但下载的文件较小-解网

问：

我正在尝试从以下位置下载 NetCDF 文件： https://ftp.cpc.ncep.noaa.gov/NMME/prob/netcdf/

当我手动下载文件时，我得到了一个大约 5000 KB 的文件，当它使用下面的代码下载时，我得到了一个 119 Kb 的文件，它不可用。

now <- as.Date(Sys.Date())
now <- paste0(substr(now,1,4),substr(now,6,7))
filename <- paste0('prate.',now,'.prob.adj.seas',".nc")
root <- 'https://ftp.cpc.ncep.noaa.gov/NMME/prob/netcdf/'
download.file(root, filename,mode = "wb")

有什么建议吗？谢谢

r 下载 netcdf

## your code
now <- as.Date(Sys.Date())
now <- paste0(substr(now,1,4),substr(now,6,7))
filename <- paste0('prate.',now,'.prob.adj.seas',".nc")
root <- 'https://ftp.cpc.ncep.noaa.gov/NMME/prob/netcdf/' # main_url

## changes
path <- getwd() # example of donwload directory
download.file(url = paste0(root, filename), 
              destfile = file.path(path, basename(filename)))

看?download.file

的第一个参数是，即。download.file()url"https://ftp.cpc.ncep.noaa.gov/NMME/prob/netcdf/prate.202311.prob.adj.seas.nc"
然后指定，即本地路径，下载目录和文件名的组合。在 Mac OS X 上，它看起来像 .destfile"/Users/YourUsername/Desktop/prate.202311.prob.adj.seas.nc"

download.file(url = paste0(root, filename), 
              destfile = file.path(path, basename(filename)))

等于

download.file(
  url = "https://ftp.cpc.ncep.noaa.gov/NMME/prob/netcdf/prate.202311.prob.adj.seas.nc",
  destfile = "/Users/YourUsername/Desktop/prate.202311.prob.adj.seas.nc")

我认为没有必要。还没检查过。mode = "wb"

使用 R 下载 NetCDF 文件：手动工作，但下载的文件较小

Downloading NetCDF files with R: Manually works but the downloaded file is smaller

评论

评论