R/saveDir.R

Defines functions `saveDir`

`saveDir` <-
function() {
Dir <- tclvalue(tkchooseDirectory(title="Please specify the folder"))
assign("DirName",Dir ,envir=.GlobalEnv)
tclvalue(SaveDirName ) <<- Dir 
if (!nchar(Dir ))
    tkmessageBox(message="No folder was selected!")
}

Try the IsoGeneGUI package in your browser

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

IsoGeneGUI documentation built on Nov. 8, 2020, 5:52 p.m.