## Not run: ------------------------------------
# switch(menu(c("List letters", "List LETTERS")) + 1,
# cat("Nothing done\n"), letters, LETTERS)
## ---------------------------------------------
Run the code above in your browser using DataLab