if (character_to_logical(
raw_input("Would you like to create a directory for testing
at current working directory?",c('yes','no')))){
## make.dir('testdir','751') # uncomment it to let R create the directory
}Run the code above in your browser using DataLab