INUNDACIONES.R

#Script para inundaciones

library(mapview)

## Warning: package 'mapview' was built under R version 3.6.1

library(raster)

## Warning: package 'raster' was built under R version 3.6.1

## Loading required package: sp

## Warning: package 'sp' was built under R version 3.6.1

pal = mapviewPalette("mapviewTopoColors")

Navojoa <- raster("Depth.tif", package = "mapview")
inundacion <- stack(Navojoa )

mapview(inundacion[[1]], col.regions = pal(100), at = seq(-0.2, 1, 0.2), legend = TRUE)

## Warning in rasterCheckSize(x, maxpixels = maxpixels): maximum number of pixels for Raster* viewing is 5e+05 ; 
## the supplied Raster* has 638401 
##  ... decreasing Raster* resolution to 5e+05 pixels
##  to view full resolution set 'maxpixels =  638401 '