Description Usage Details Value Author(s) Examples
This function enables to retrieve WMS URLs of Sentinel products given a collection, a ROI, a time frame and a set of bands of interest.
1 2 | shr_get_url(collection, variables, roi, time_range,
cloud_cover_max = NULL, instance_id = NULL, verbose = FALSE)
|
Available collections : S2L2A, S1-AWS-IW-VVVH
Available dimensions :
for collection S2L2A : 1_TRUE_COLOR, 2_FALSE_COLOR, 3_NDVI, 4_FALSE_COLOR, 5_MOISTURE_INDEX, 6_SWIR, 7-NDWI, 8_NDSI, 9_SCENE_CLASSIFICATION, B01, B02, etc... B12
for collection S1-AWS-IW-VVVH : towrite
a data.frame with one row for each dataset and 3 columns :
*time_start*: Start Date/time for the dataset
*name*: An indicative name for the dataset
*url*: WMS URL for the dataset
Paul Taconet, IRD paul.taconet@ird.fr
1 2 3 4 5 6 7 8 9 10 11 12 13 | ## Not run:
# login to the wms server
log_s1 <- shr_login(Sys.getenv("instance_id_shub_s1"),"sentinel1")
log_s2 <- shr_login(Sys.getenv("instance_id_shub_s2"),"sentinel2")
roi <- sf::st_as_sf(data.frame(geom="POLYGON ((-5.82 9.54, -5.42 9.55, -5.41 8.84, -5.81 8.84, -5.82 9.54))"),wkt="geom",crs = 4326)
time_range<-as.Date(c("2017-01-01","2017-01-30"))
(s1_urls <-shr_get_url(collection = "S1-AWS-IW-VVVH", variables = c("VV","VH") ,roi = roi, time_range = time_range))
(s2l2a_urls <-shr_get_url(collection = "S2L2A", variables = c("B04","B08","B8A","B11","9_SCENE_CLASSIFICATION") ,roi = roi, time_range = time_range))
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.