R/pause.R

pause <-
function (x=0) { 
	if(x > 0){
		Sys.sleep(x)
	}else{
		cat("Hit <enter> to continue...")
		readline()
		invisible()
	}
}

Try the ExPosition package in your browser

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

ExPosition documentation built on May 1, 2019, 7:06 p.m.