Called by the plot_hist module in the example app and extracts values from a raster image, returning a histogram of density
plot_hist(raster, bins, palette, name, logger = NULL)
SpatRaster object
The number of breaks in the histogram
character. The colour palette to use
character. The name of the variable
Stores all notification messages to be displayed in the Log Window. Insert the logger reactive list here for running in shiny, otherwise leave the default NULL
a function that generates a histogram
if (check_suggests(example = TRUE)) {
raster <- terra::rast(ncol = 8, nrow = 8)
raster[] <- sapply(1:terra::ncell(raster), function(x){
rnorm(1, ifelse(x %% 8 != 0, x %% 8, 8), 3)})
histogram <- plot_hist(raster, bins = 10, palette = "Greens", name = "Example")
histogram()
} else {
message('reinstall with install.packages("shinyscholar", dependencies = TRUE)
to run this example')
}