R/ClearPlot.R

In Chitran1987/StatsChitran: StatsChitran

Defines functions ClearPlot

Documented in ClearPlot

#write a program to clear the graphics output if a plot is displayed
ClearPlot<-function(){
  if (names(dev.cur()) !='null device'){
    invisible(dev.off())
  }
  #return NULL
}