```r
elev[1:2, drop = FALSE]    # spatial subsetting with cell IDs
elev[1, 1:2, drop = FALSE] # spatial subsetting by row,column indices
#> class       : RasterLayer 
#> dimensions  : 1, 2, 2  (nrow, ncol, ncell)
#> ...
```