| senMosaic | R Documentation | 
senMosaic merges the Sentinel-2 imagery that covers a region of interest
on the same dates.
senMosaic( src, AppRoot, region = NULL, out.name = "outfile", verbose = FALSE, gutils = TRUE, overwrite = FALSE, ... )
| src | the path of the folder with the Sentinel images in GTiff format. | 
| AppRoot | the directory to save the mosaicked images. | 
| region | a  | 
| out.name | the name of the folder that stores the outputs. By default, “outfile” is assigned. | 
| verbose | logical argument. If  | 
| gutils | logical argument. If  | 
| overwrite | logical argument. If  | 
| ... | arguments for nested functions: 
 | 
The function mosaics the imagery in the src folder. The folder can
hold GTiff images from several tiles, dates and bands. When only a subset
dates has to be mosaicked, the dates should be provided through the argument
dates. The dates must be provided as a Date class object.For
further details about the bFilter argument, go to the 
senDownload function. Once mosaicked, the images can be cropped
to fit the region (optional). The region can be defined in any
coordinate reference system, since senMosaic automatically reproject
the extent to match the projection of the image. The outputs will be placed
in the AppRoot directory, under the folder named as out.name.
If no name is provided, the folder is named “outfile”.
this function does not return anything. It saves the imagery in the
AppRoot directory.
## Not run: 
# load a spatial polygon object of Navarre
data(ex.navarre)
# main output directory
wdir <- file.path(tempdir(),"Path_for_downloading_folder")
print(wdir)
# download Sentinel-2 images
senDownSearch(startDate = as.Date("2018210", "%Y%j"),
              endDate = as.Date("2018218", "%Y%j"),
              platform = "Sentinel-2",
              extent = ex.navarre,
              product = "S2MSI1C",
              pathrow = c("R094"),
              username = "username",
              password = "password",
              AppRoot = wdir)
# folder with the unzipped images
wdir.sen <- file.path(wdir, "Sentinel-2")
wdir.sen.unzip <- file.path(wdir.sen, "unzip")
# mosaic the Sentinel-2 images
senMosaic(wdir.sen.unzip,
          AppRoot = wdir.sen,
          gutils = TRUE,
          out.name = "Navarre")
          
wdir.sen <- file.path(wdir.sen,"Navarre")
# load and plot a Sentinel-2 image
files.sen <- list.files(wdir.sen, pattern = "\\.tif$", full.names = TRUE ,recursive = TRUE)
# print Sentinel-2 bands
getRGISToolsOpt("SEN2BANDS")
file.sen.rgb <- stack(files.sen[grepl("TCI",files.sen)][1])
plotRGB(file.sen.rgb)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.