Skip to main content
. 2020 Aug 26;22(9):937. doi: 10.3390/e22090937
svn_grid$results = NA
for (i in seq_len(nrow(svn_grid))){
  small_raster = crop(svn_dem, svn_grid[i, ])
  if(!all(is.na(getValues(small_raster)))){
   svn_grid$results[i] = get_boltzmann(small_raster)
  }
}