循环创建栅格答案

【问题标题】：Loop to create raster循环创建栅格
【发布时间】：2021-07-04 18:51:22
【问题描述】：

我想从网站https://www.nies.go.jp/REAS/index.html#data%20setsREASv3.2 下载 CO2 变量从 1950 年到 2015 年的数据。如何在 R 中为此构造一个循环，从而产生一个栅格？我只想在这个文件中获取1950年到2015年的变量REASv3.2_CO2-BF_TOTAL。

【问题讨论】：

标签： r raster tiff

【解决方案1】：

您问题的第一部分：如何下载这些文件。

# First try with a small amount of data before getting all years
years <- 1950:1953

# set a download folder, for example D:/tmp/
download_folder <- "D:/tmp/"

for (i in seq_along(years)) {
# set url and destination
  url <- paste0("https://www.nies.go.jp/REAS/REASv3.2_Grid/CO2_", years[i], "_GRID.tar.gz")
  destination <- paste0(download_folder, "CO2_", years[i], "_GRID.tar.gz")
  
# download files
  download.file(url, destination)

# extract files
  untar(destination, exdir = download_folder)
}

在此之后，您的文件将下载并提取到D:/tmp/CO/[YEAR]。每个 [YEAR] 文件夹中都有您的数据，例如 REASv3.2_CO2-BF_TOTAL_1951_0.25x0.25。

我用 Notepad++ 看了一下这个，但我不认识将它加载到 data.frame 中的结构。我什至不知道，“光栅”是什么意思。这是您问题的第二部分，由您决定。

注意：每个文件下载大约 10 MB，解压后大约 50 MB。

【讨论】：