powered by
guiDlgDir(title = "Select a directory", dir = getwd(), new = TRUE, parent = 0, GUI = getOption("guiWidgets"))
guiDlgOpen
guiDlgSave
#### TO DO...
Run the code above in your browser using DataLab