Skip to content

Commit

Permalink
update joss paper
Browse files Browse the repository at this point in the history
  • Loading branch information
ptaconet committed Jul 18, 2024
1 parent 6f23d7d commit 00f0e2c
Showing 1 changed file with 10 additions and 5 deletions.
15 changes: 10 additions & 5 deletions joss-paper/paper.md
Original file line number Diff line number Diff line change
Expand Up @@ -136,8 +136,11 @@ library(modisfast)
library(sf)
library(terra)

## ROI (format sf type POLYGON, with an 'id' column). Here, we provide the bounding box of Madagascar
roi_mada <- st_as_sf(data.frame(id = "madagascar", geom = "POLYGON((41.95 -11.37,51.26 -11.37,51.26 -26.17,41.95 -26.17,41.95 -11.37))"), wkt="geom", crs = 4326)
## ROI (format sf type POLYGON, with an 'id' column). Here, we provide the
# bounding box of Madagascar
roi_mada <- st_as_sf(data.frame(id = "madagascar",
geom = "POLYGON((41.95 -11.37,51.26 -11.37,51.26 -26.17,41.95 -26.17,41.95 -11.37))"),
wkt="geom", crs = 4326)

## Time range (two dates, i.e. the first and the last)
t_range <- as.Date(c("2023-01-01","2023-12-31"))
Expand All @@ -147,7 +150,8 @@ t_range <- as.Date(c("2023-01-01","2023-12-31"))
coll <- "MOD13A3.061" # Here we choose MODIS/Terra Vegetation Indices Monthly 1 km

# Variables for the collection
## run mf_list_variables("MOD13A3.061") to get an exhaustive list of variables available for the collection "MOD13A3.061"
## run mf_list_variables("MOD13A3.061") to get an exhaustive list of variables
# available for the collection "MOD13A3.061"
bands <- c("_1_km_monthly_NDVI")
```

Expand All @@ -156,7 +160,7 @@ bands <- c("_1_km_monthly_NDVI")
``` r
## Login to Earthdata servers with your EOSDIS credentials.
# To create an account (free) go to : https://urs.earthdata.nasa.gov/.
log <- mf_login(credentials = c("earthdata_username","earthdata_password")) # set your own EOSDIS username and password
log <- mf_login(credentials = c("earthdata_username","earthdata_password"))

## Get the URLs of the data
urls <- mf_get_url(
Expand All @@ -166,7 +170,8 @@ urls <- mf_get_url(
time_range = t_range
)

## Download the data. By default the data is downloaded in a temporary directory, but you can specify a folder
## Download the data. By default the data is downloaded in a temporary directory,
# but you can specify a folder
res_dl <- mf_download_data(urls, parallel = T)
```

Expand Down

0 comments on commit 00f0e2c

Please sign in to comment.