R/zzz.R

.onLoad <- function(libname, pkgname) {
	if(interactive()) {
		ans <- readline("Launch the interAdapt app? ")
		if(tolower(substr(ans, 1, 1)) == "y")
			runInterAdapt()
	}
}

Try the interAdapt package in your browser

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

interAdapt documentation built on May 2, 2019, 7:31 a.m.