From 358a54631a3b7e5e0c6909c1c532cd5a363a9324 Mon Sep 17 00:00:00 2001 From: ambarja Date: Mon, 2 Oct 2023 18:45:05 -0500 Subject: [PATCH] updated get_vegetation --- R/get_vegetation.R | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/R/get_vegetation.R b/R/get_vegetation.R index 9660123..5950cfe 100644 --- a/R/get_vegetation.R +++ b/R/get_vegetation.R @@ -56,17 +56,17 @@ get_vegetation <- function(from, to, band, region, fun = "count", scale = 1000) # Message of error - if (end_year < 1999 | start_year >= 2021) { + if (end_year < 1999 | start_year > 2024) { print(sprintf("No exist data")) } # NDVI - EVI if (band == "SAVI") { - collection <- ee$ImageCollection("MODIS/006/MOD13A1")$ + collection <- ee$ImageCollection("MODIS/061/MOD13A1")$ select(c("sur_refl_b01", "sur_refl_b02", "DetailedQA")) } else { - collection <- ee$ImageCollection("MODIS/006/MOD13A1")$ + collection <- ee$ImageCollection("MODIS/061/MOD13A1")$ select(c(band, "DetailedQA")) }