# NOT RUN {
choices = c("two.sided", "less", "greater")
abbreviation( "two", choices )
abbreviation( "l", choices )
abbreviation( "gr", choices )
abbreviation( "greater", choices )
abbreviation( "Not in choices", choices )
# }
Run the code above in your browser using DataLab