R/flplot_land.R

In FjordLight: Available Light Within the Water Column and on the Seafloor of Arctic Fjords

#' Plot land data found within NetCDF files downloaded by \code{FjordLight}.
#'
#' Internal function used by \code{\link{flget_bathymetry}} that plots the land data
#' contained within the NetCDF files downloaded via \code{\link{fl_DownloadFjord}}.
#'
#' @keywords internal
#'
#' @param r The land data in a raster format.
#' @param name The name of the chosen fjord.
#'
#' @return A base R plot of the land data will be provided.
#'
#' @author Bernard Gentili
#'
flplot_land <- function(r,
                        name) {

  raster::plot(r, col = grDevices::terrain.colors(255),
               colNA = "transparent", main = paste(name, names(r)),
               legend.width = 1.5, legend.shrink = 1, legend.mar = 10,
               legend.args = list(text = "",
                                  side = 4, cex = 1.5, line = 3.5)
  )

}