R/lsRemoveMetadata.R

In spatialstatisticsupna/RGISTools: Handling Multiplatform Satellite Images

#' Remove the Landsat-7 or Lansat-8 metadata from the environment
#'
#' \code{lsRemoveMetadata} removes Landsat-7 and/or Landsat-8 (\code{.LS7MD}/
#' \code{.LS8MD}) metadata from the environment in `R'.
#'
#' The metadata file is loaded in `R' with \code{\link{ls7Search}}, 
#' \code{\link{ls8Search}} and \code{\link{lsDownSearch}}. \code{lsRemoveMetadata}
#' removes the metadata and frees up valuable RAM.
#'
#' @examples
#' \dontrun{
#' # creates a MetaData folder and downloads the csv file
#' # in the current working directory
#' wdir <- file.path(tempdir(),"Path_for_downloading_folder")
#' print(wdir)
#' ls8LoadMetadata(AppRoot = wdir)
#' lsRemoveMetadata()
#' }
lsRemoveMetadata<-function(){
  setRGISToolsOpt("LS7METADATA",NULL)
  setRGISToolsOpt("LS8METADATA",NULL)
  gc()
}