```r
# numerical summary of the data
summary(new_raster)
#> Warning in .local(object, ...): summary is an estimate based on a sample of 1e+05 cells (47.06% of all cells)
#>         srtm
#> Min.    1034
#> 1st Qu. 1535
#> Median  1839
#> 3rd Qu. 2115
#> Max.    2892
#> NA's       0
```