R/outline.buffer.R

In ericpante/marmap: Import, Plot and Analyze Bathymetric and Topographic Data

Defines functions outline.buffer

Documented in outline.buffer

outline.buffer <- function(buffer) {
  if (!is(buffer,'bathy')) stop("'buffer' must be a buffer of class bathy")
  buffer[!is.na(buffer)] <- -1
  buffer[is.na(buffer)] <- 0
  return(buffer)
}