R/checkObject.R

checkObject <- function (x,del=TRUE) {
			if (del==F) {
				exists(x, envir=.GlobalEnv)
			} 
			else {
				if(exists(x, envir=.GlobalEnv) ) remove(list=x, envir=.GlobalEnv)
			}
			
		}

Try the neaGUI package in your browser

Any scripts or data that you put into this service are public.

neaGUI documentation built on May 2, 2019, 5:41 p.m.